Perl めも

 do { local $/ ; <$foo> } 

暗号杉

use File::Slurp;