[EMAIL PROTECTED] wrote:
> open(FH, "</usr/www/domain/faq.txt"); # < for read, > for write, >> for
> append local $/ = undef; # slurp mode (allow for shoving the whole file
> into a scalar)
> my $faq = <FH>; # slurp the whole file into this scalar.
> close(FH);
>
open(FH, $file) or die("open $file: $!");
print(<FILE>); # print() takes a list. DWIM in action.
close(FH) or die("close $file: $!");
Todd W.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
