Memoize.t revision 7c478bd95313f5f23a4c958a745db2134aa03244
#!./perl -w
BEGIN {
chdir 't' if -d 't';
}
use strict;
sub slurp {
local $/;
<$h> # slurp it all
}
{ fake_file1 => 123, fake_file2 => 45678 },
untie %hash;