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

2 lines
71 B
Perl

use File::Slurper 'read_text';
my $text = read_text($filename, $data);