Subversion Repositories DevTools

Rev

Rev 263 | Rev 281 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 263 Rev 279
Line 111... Line 111...
111 
my $result = GetOptions (
 111 
my $result = GetOptions (
112 
                "help+"         => \$opt_help,              # flag, multiple use allowed
 112 
                "help+"         => \$opt_help,              # flag, multiple use allowed
113 
                "manual"        => \$opt_manual,            # flag
 113 
                "manual"        => \$opt_manual,            # flag
114 
                "verbose+"      => \$opt_verbose,           # flag
 114 
                "verbose+"      => \$opt_verbose,           # flag
115 
                "sbomid=s"      => \$opt_sbom_id,           # string
 115 
                "sbomid=s"      => \$opt_sbom_id,           # string
- 
 
 116 
                "sbom_id=s"     => \$opt_sbom_id,           # string
116 
                "rtagid=s"      => \$opt_rtag_id,           # string
 117 
                "rtagid=s"      => \$opt_rtag_id,           # string
- 
 
 118 
                "rtag_id=s"     => \$opt_rtag_id,           # string
117 
                "rootpackage=s" => \$opt_rootpkg,           # String
 119 
                "rootpackage=s" => \$opt_rootpkg,           # String
118 
                "ignore=s",     => sub{my ($a,$i) = @_; $ignore{$i} = 0 },
 120 
                "ignore=s",     => sub{my ($a,$i) = @_; $ignore{$i} = 0 },
119 
                "test!"         => \$opt_test,              #[no]flag
 121 
                "test!"         => \$opt_test,              #[no]flag
120 
                "patch!"        => \$opt_patch,             #[no]flag
 122 
                "patch!"        => \$opt_patch,             #[no]flag
121 
                "extract=s"     => \$opt_extract,           # Name of file
 123 
                "extract=s"     => \$opt_extract,           # Name of file