Select Code to Download

open my $file, "<", $file or die "crap: $!";
my $raw = do { local $/; <$file> }; # sexy
close $file;