if ( $line =~ /\cZ/ ) {
        warn "found DOS end-of-text-file marker at line $.\n";
    }