Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister

Re^3: getopts and -?

by Anonymous Monk
on May 10, 2011 at 02:52 UTC ( #903896=note: print w/ replies, xml ) Need Help??

in reply to Re^2: getopts and -?
in thread getopts and -?

$ perl -MGetopt::Long -MDDS -e " Getopt::Long::Configure(qw[no_ignore_ +case]); GetOptions( \%h, qw[ l! L:s ] ); Dump(\%h); " -- -l -L asdf $HASH1 = { L => 'asdf', l => 1 };

use Getopt::Long qw[ :config no_ignore_case ]; use DDS; local @ARGV = qw[ -l -L asdf ]; GetOptions( \%h, qw[ l! L:s ] ); Dump( \%h ); __END__ $HASH1 = { L => 'asdf', l => 1 };

Comment on Re^3: getopts and -?
Select or Download Code
Replies are listed 'Best First'.
Re^4: getopts and -?
by viffer (Sexton) on May 10, 2011 at 02:57 UTC
    Thank you, I should learn in future to take more time before i ask a question. You were typing a response at the same time as i was asking the question! :)

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://903896]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (7)
As of 2015-11-26 14:18 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (701 votes), past polls