Select Code to Download

use warnings;
use strict;
...
   print "Option: $key, value: $value\n"
}
print "Remaining arguments: @ARGV\n";

C:\>gash.pl -ac
Option: c, value: 1
...
Option: c, value: 1
Option: a, value: 1
Remaining arguments: fred jim