Help for this page

Select Code to Download

Select or download this

use 5.008;
use File::Slurp qw/ read_file /;
...
        or die "I have no idea if or why this would ever die, but anyw
+ay: $!";
    return $fh;
};