in reply to Re^3: Another prediction of Perl's demise
in thread Another prediction of Perl's demise
That's not very much code. Or, use CPAN.use Fatal qw( :void open close ); sub slurp { local $/ = undef; my ($s, $file); open $file, $_[0]; $s = readline $file; close $file; return $s; } $foo = slurp("bar.txt");
use Slurp; my $foo = slurp("bar.txt", "baz.txt");
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^5: Another prediction of Perl's demise
by apotheon (Deacon) on Nov 26, 2004 at 07:18 UTC | |
by Dylan (Monk) on Nov 27, 2004 at 17:09 UTC | |
by apotheon (Deacon) on Nov 28, 2004 at 03:08 UTC | |
by Dylan (Monk) on Nov 28, 2004 at 07:40 UTC | |
by apotheon (Deacon) on Nov 29, 2004 at 09:34 UTC |