If you're really paranoid:
use IO::File;
$f = IO::File->new($ARGV[0], O_RDONLY) or die "can't open $ARGV[0]: $!\n";
while (defined ($_ = $f->getline)) {
chomp;
# ...
}
-- brandon s. allbery [os/2][linux][solaris][japh] allbery@kf8nh.apk.net system administrator [WAY too many hats] allbery@ece.cmu.edu electrical and computer engineering KF8NH carnegie mellon university
- To unsubscribe from this list: send the line "unsubscribe linux-kernel" in the body of a message to majordomo@vger.rutgers.edu Please read the FAQ at http://www.tux.org/lkml/