use Getopt::Long; $result = GetOptions (...option-descriptions...);
GetOptions.
This function adheres to the
POSIX syntax for command line options, with
GNU extensions. In general, this means that options have long names instead of single letters, and are introduced with a double dash ``--''. Support for bundling of command line options, as was the case with the more traditional single-letter approach, is provided but not enabled by default. For example, the
UNIX ``ps'' command can be given the command line ``option''
-vax
which means the combination of -v, -a and -x. With the new syntax --vax would be a single option, probably indicating a computer architecture.
Command line options can be used to set values. These values can be specified in one of two ways:
--size 24 --size=24
GetOptions is called with a list of option-descriptions, each of which consists of two elements: the option specifier and the option linkage. The option specifier defines the name of the option and, optionally, the value it can take. The option linkage is usually a reference to a variable that will be set when the option is used. For example, the following call to GetOptions:
&GetOptions("size=i" => \$offset);
will accept a command line option ``size'' that must have an integer value.
With a command line of ``--size 24'' this will cause the variable
$offset
to get the value 24.
Alternatively, the first argument to GetOptions may be a reference to a HASH describing the linkage for the options. The following call is equivalent to the example above:
%optctl = ("size" => \$offset); &GetOptions(\%optctl, "size=i");
Linkage may be specified using either of the above methods, or both. Linkage specified in the argument list takes precedence over the linkage specified in the HASH.
The command line options are taken from array
@ARGV. Upon completion of GetOptions,
@ARGV
will contain the rest (i.e. the non-options) of the
command line. Each option specifier designates the name of the option,
optionally followed by an argument specifier. Values for argument
specifiers are:
A double dash on itself -- signals end of the options list.
%optctl = (); &GetOptions (\%optctl, "size=i");
will perform the equivalent of the assignment
$optctl{"size"} = 24;
For array options, a reference to an array is used, e.g.:
%optctl = (); &GetOptions (\%optctl, "sizes=i@");
with command line ``-sizes 24 -sizes 48'' will perform the equivalent of the assignment
$optctl{"sizes"} = [24, 48];
For hash options (an option whose argument looks like ``name=value''), a reference to a hash is used, e.g.:
%optctl = (); &GetOptions (\%optctl, "define=s%");
with command line ``--define foo=hello --define bar=world'' will perform the equivalent of the assignment
$optctl{"define"} = {foo=>'hello', bar=>'world')
If no linkage is explicitly specified and no ref HASH is passed, GetOptions will put the value in a global variable named after the option, prefixed by ``opt_''. To yield a usable Perl variable, characters that are not part of the syntax for variables are translated to underscores. For example, ``--fpp-struct-return'' will set the variable $opt_fpp_struct_return. Note that this variable resides in the namespace of the calling program, not necessarily main. For example:
&GetOptions ("size=i", "sizes=i@");
with command line ``-size 10 -sizes 24 -sizes 48'' will perform the equivalent of the assignments
$opt_size = 10; @opt_sizes = (24, 48);
A lone dash - is considered an option, the corresponding Perl identifier is
$opt_
.
The linkage specifier can be a reference to a scalar, a reference to an array, a reference to a hash or a reference to a subroutine.
If a REF SCALAR is supplied, the new value is stored in the referenced variable. If the option occurs more than once, the previous value is overwritten.
If a REF ARRAY is supplied, the new value is appended (pushed) to the referenced array.
If a REF HASH is supplied, the option value should look like ``key'' or ``key=value'' (if the ``=value'' is omitted then a value of 1 is implied). In this case, the element of the referenced hash with the key ``key'' is assigned ``value''.
If a REF CODE is supplied, the referenced subroutine is called with two arguments: the option name and the option value. The option name is always the true name, not an abbreviation or alias.
Option names may be abbreviated to uniqueness, depending on configuration option auto_abbrev.
See also the examples.
Options that start with ``--'' may have an argument appended, separated with an ``='', e.g. ``--foo=bar''.
If an ``@'' sign is appended to the argument specifier, the option is treated as an array. Value
are not set, but pushed into array @opt_name. If explicit linkage is supplied, this must be a reference to an
ARRAY.
If an ``%'' sign is appended to the argument specifier, the option is treated as a hash. Value
of the form ``name=value'' are set by setting the element of the hash %opt_name
with key ``name'' to ``value'' (if the ``=value'' portion is omitted it defaults to 1). If explicit linkage is supplied, this must be a reference to a
HASH.
If configuration option getopt_compat is set (see section CONFIGURATION OPTIONS), options that start with ``+'' or ``-'' may also include their arguments, e.g. ``+foo=bar''. This is for compatiblity with older implementations of the GNU ``getopt'' routine.
If the first argument to GetOptions is a string consisting of only non-alphanumeric characters, it is taken to specify the option starter characters. Everything starting with one of these characters from the starter will be considered an option. Using a starter argument is strongly deprecated.
For convenience, option specifiers may have a leading - or --, so it is possible to write:
GetOptions qw(-foo=s --bar=i --ar=s);
-one -two -> $opt_one = '', -two is next option -one -2 -> $opt_one = -2
Also, assume specifiers ``foo=s'' and ``bar:s'' :
-bar -xxx -> $opt_bar = '', '-xxx' is next option -foo -bar -> $opt_foo = '-bar' -foo -- -> $opt_foo = '--'
In GNU or POSIX format, option names and values can be combined:
+foo=blech -> $opt_foo = 'blech' --bar= -> $opt_bar = '' --bar=-- -> $opt_bar = '--'
Example of using variable references:
$ret = &GetOptions ('foo=s', \$foo, 'bar=i', 'ar=s', \@ar);
With command line options ``-foo blech -bar 24 -ar xx -ar yy'' this will result in:
$foo = 'blech' $opt_bar = 24 @ar = ('xx','yy')
Example of using the <> option specifier:
@ARGV = qw(-foo 1 bar -foo 2 blech); &GetOptions("foo=i", \$myfoo, "<>", \&mysub);
Results:
&mysub("bar") will be called (with $myfoo being 1) &mysub("blech") will be called (with $myfoo being 2)
Compare this with:
@ARGV = qw(-foo 1 bar -foo 2 blech); &GetOptions("foo=i", \$myfoo);
This will leave the non-options in @ARGV:
$myfoo -> 2 @ARGV -> qw(bar blech)
Previous versions of Getopt::Long used variables for the purpose of configuring. Although manipulating these variables still work, it is strongly encouraged to use the new config routine. Besides, it is much easier.
The following options are available:
See also permute, which is the opposite of require_order.
If permute is set, this means that
-foo arg1 -bar arg2 arg3
is equivalent to
-foo -bar arg1 arg2 arg3
If a non-option call-back routine is specified, @ARGV
will
always be empty upon succesful return of GetOptions since all options have
been processed, except when -- is used:
-foo arg1 -bar arg2 -- arg3
will call the call-back routine for arg1 and arg2, and terminate leaving arg2 in @ARGV.
If require_order is set, options processing terminates when the first non-option is encountered.
-foo arg1 -bar arg2 arg3
is equivalent to
-foo -- arg1 -bar arg2 arg3
ps -vax --vax
would be equivalent to
ps -v -a -x --vax
provided ``vax'', ``v'', ``a'' and ``x'' have been defined to be valid options.
Bundled options can also include a value in the bundle; this value has to be the last part of the bundle, e.g.
scale -h24 -w80
is equivalent to
scale -h 24 -w 80
Note: resetting bundling also resets bundling_override.
Note: resetting bundling_override also resets bundling.
Note: Using option bundling can easily lead to unexpected results, especially when mixing long options and bundles. Caveat emptor.
Note: resetting ignore_case also resets ignore_case_always.
Note: resetting ignore_case_always also resets ignore_case.
@ARGV
instead of being
flagged as errors. This makes it possible to write wrapper scripts that
process only part of the user supplied options, and passes the remaining
options to some other program.
This can be very confusing, especially when permute is also set.
major
.minor
. This can be used to have Exporter check the version, e.g.
use Getopt::Long 3.00;
You can inspect $Getopt::Long::major_version and $Getopt::Long::minor_version for the individual components.