chomp(my @words = do {local(@ARGV, $/) = "/path/to/file"; <>});