Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options

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 };

Replies are listed 'Best First'.
Re^4: getopts and -?
by viffer (Beadle) 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
Domain Nodelet?
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 meditating upon the Monastery: (4)
As of 2022-06-24 21:45 GMT
Find Nodes?
    Voting Booth?
    My most frequent journeys are powered by:

    Results (80 votes). Check out past polls.