#!/usr/local/bin/perl -w

print 'Look Dad - we can make millions now!', "\n\n";

print "Arguments are: ", join (', ',@ARGV), "\n\n";