if ($ARGV[0] eq "-H"){ print "Help goes here\n"; } elsif ( $ARGV[0] eq "-L") { print "List of things here\n"; } elsif ( $ARGV[0] eq "-Action") { my $parameter1 = $ARGV[1]; my $parameter2 = $ARGV[2]; print "Rest of program here\n";}