Select Code to Download

my $contents = do { local (@ARGV, $/) = $filename; <> };

# Slurp file
my $contents = do { local (@ARGV, $/) = $filename; <> };