summaryrefslogtreecommitdiffstats
path: root/fake_packages/Getopt/Long.pm
blob: c7c42343b34efc122b6f32b0dd7cf4e811f983aa (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40

package Getopt::Long;
our @ISA = qw();
sub ConfigDefaults() {}
sub ConfigDefaults(); {}
sub Configure { my ($_o_options) = @_ }
sub Configure(@); {}
sub FindOption { my ($_argv, $_prefix, $_argend, $_opt, $_o_opctl) = @_ }
sub FindOption($$$$$); {}
sub GetOptions(@) {}
sub GetOptions(@); {}
sub GetOptionsFromArray(@) { my ($_argv, $_o_optionlist) = @_ }
sub GetOptionsFromArray(@); {}
sub GetOptionsFromString(@) {}
sub GetOptionsFromString(@); {}
sub HelpMessage(@) {}
sub HelpMessage(@); {}
sub OptCtl { my ($_o_v) = @_ }
sub OptCtl($); {}
sub ParseOptionSpec { my ($_opt, $_o_opctl) = @_ }
sub ParseOptionSpec($$); {}
sub VERSION() {}
sub ValidValue { my ($_ctl, $_arg, $_mand, $_argend, $_o_prefix) = @_ }
sub VersionMessage(@) {}
sub VersionMessage(@); {}
sub config() {}
sub config(@); {}
sub import() {}
sub setup_pa_args($@) {}

package Getopt::Long::CallBack;
our @ISA = qw();
sub name() {}
sub new { my ($_pkg, $_o_atts) = @_ }

package Getopt::Long::Parser;
our @ISA = qw();
sub configure() {}
sub getoptions() {}
sub new { my ($_o_atts) = @_ }