There is File::Slurp which provides read_file(), write_file(), append_file(), and read_dir(). I often use it for both long and short programs. It's one of my favourite can't-live-without modules. I think it pretty much does what you want, but with another interface, and you need to perhaps use an intermediate scalar.

ihb

Read argumentation in its context!