...
my ($first, $last ) = @ARGV;
print "F=$first - L=$last\n";
...