Select Code to Download

use Fatal qw( :void open close );
sub slurp {
...
}

$foo = slurp("bar.txt");

use Slurp;
my $foo = slurp("bar.txt", "baz.txt");