#!/usr/bin/perl use strict; # what's with this $0 ?????????? print "The program was invoked with $0\n"; #what's with this ARGV ???????? my $i; for($i=0; $i<=$#ARGV; $i++) { print "i is $i ARGV is $ARGV[$i]\n"; }