> Try to use(UpperCase): > open(TEXT,"text.txt") > while(<TEXT>)
Also, if you're using Perl >= 5.6.0, use the $fh notation and get around
the barewords entirely.
open( my $fh, "text.txt" ) or die $!;
while ( <$fh> ) {
# whatever
}
close $fh;
--
'Andy Lester [EMAIL PROTECTED]
Programmer/author petdance.com
Daddy parsley.org/quinn Jk'=~/.+/s;print((split//,$&)
[unpack'C*',"n2]3%+>\"34.'%&.'^%4+!o.'"])
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
