my @array = do { local @ARGV = "foo.txt"; <> };