Lines Matching refs:arg
81 my $arg = $ARGV[0];
82 last unless $arg =~ /-.*/;
83 $arg = $1 if $arg =~ /-(-.*)/;
84 if ( $arg eq "-conf" ) {
87 } elsif ( $arg eq "-debug" ) {
90 } elsif ( $arg eq "-internal" ) {
92 } elsif ( $arg eq "-nowrite" ) {
94 } elsif ( $arg eq "-rebuild" ) {
96 } elsif ( $arg eq "-reindex" ) {
98 } elsif ( $arg eq "-static" ) {
100 } elsif ( $arg eq "-unref" ) {
103 } elsif ( $arg eq "-module" ) {
106 } elsif ( $arg =~ /-*h(elp)?/ ) {
109 } elsif ( $arg =~ /-.*/ ) {
110 die "Unknown option $arg; use -h for help.\n";
