sivasakthi 写道:
open FF, "/tmp/userip.txt" or die $!; $arrskip{$_}= 1 while (<FF>);
Hello, Here you may try to do, while(<FF>) { chomp; $arrskip{$_} = 1; }chomp would remove newline symbol (on Unix it's "\n") reading from the original file.
-- http://home.arcor.de/jeffpang/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/