RosettaCodeData/Task/Read-entire-file/Perl/read-entire-file-8.pl
2016-12-05 22:15:40 +01:00

3 lines
68 B
Perl

use File::Map 'map_file';
map_file(my $str, "foo.txt");
print $str;