sub slurp { local (@ARGV, $/) = shift; <> }