getopt.txt

• Back
• Raw format

# myscript.pl --foo hello --bar world arg0 arg1 arg2

GetOptions(\%ARGS, qw/
    foo=s
    bar=s
/);

print "$ARGS{'foo'} $ARGS{'bar'}"; # "hello world"
print join "," @ARGV;              # "arg0,arg1,arg2";

#------------------------------------------------------------------

# myscript --foo "arg1 arg2"
# myscript --foo arg1,arg2

GetOptions(\%ARGS, qw/
    foo=s
/);

@foos = [ split /\W/, $ARGS{'foo'} ]; # [ "arg1", "arg2" ]