local @ARGV = "Foo.pm"; # TODO: make this search @INC
local $/;
eval "#line Foo.pm 1\nuse bytes;" . <>;
die $@ if $@;