Another way to do it:

open my $FILE, '<:raw', $file or die "could not open $file: $!";
-s $FILE == read $FILE, my $raw, -s $FILE or die "could not read $file
+: $!";;
close $FILE;
[download]