my $hash = do 'hash.pl';
print $! || $@ || $hash->{'key'};