#!/usr/bin/perl use 5.010; print "argv= @ARGV, #args=",$#ARGV,"\n";