in reply to How to check for the command line option entered?

perlintro 
$ perl -MDDS -le" my %options=(); use Getopt::Std; getopt(q!bg!,\%opti
+ons); Dump(\%options) " -- -b o -g i
$HASH1 = {
           b => 'o',
           g => 'i'
         };

[download]
http://cpansearch.perl.org/src/BINGOS/perl-5.13.7/lib/Getopt/Std.t

Getopt::Std site:perlmonks.org

In Section Seekers of Perl Wisdom