1 2 3 4 5
use Getopt::Long; my $country = 'Canada'; GetOptions("country=s" => \$country) or die("Error in command line args\n"); print "Country is $country\n";
1
Country is Canada