#!/usr/bin/perl -w # dump the contents of a file from the command line using Futils.pm use Futils; my($f) = Futils->new(); print($f->load_file($ARGV[0]));