$ perldoc path::tinY |ack -in slurp $guts = $file->slurp; $guts = $file->slurp_utf8;