Help for this page

Select Code to Download


  1. or download this
    #!/your/perl/here
use strict;
...
use Getopt::Declare $string => $options;   ### <<< BONK!

print "one = $options->{-one}\n";
  2. or download this
    use Getopt::Declare;
$options = Getopt::Declare->new($string);