rp the entire file into one
variable, just tell Perl not to stop at the end of each line.
local $/ = undef;
open( TEXT, "text.txt" ) or die;
my $text = ;
close( TEXT );
print $text;
--
'Andy Lester[EMAIL PROTECTED]
Programmer/author petdance.com
Daddy parsley.o
>Try to use(UpperCase):
> open(TEXT,"text.txt")
> while()
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> ) {
index.html (or whatever else is
specified in the DirectoryIndex directive).
xoxo,
Andy
--
'Andy Lester[EMAIL PROTECTED]
Programmer/author petdance.com
Daddy parsley.org/quinn Jk'=~/.+/s;print((split//,$&)
[unpack'C*',&q
