$ cpan
> install File::Slurp
> quit

$ mkdir fileslurp
$ cd fileslurp
$ perldoc File::Slurp
# This next bit is cut and paste:
$ cat > t.pl
               use File::Slurp;

               $all_of_it = read_file($filename);
               @all_lines = read_file($filename);

               write_file($filename, @contents)

               overwrite_file($filename, @new_contnts);

               append_file($filename, @additional_contents);

               @files = read_dir($directory);


$ vi t.pl