Lines Matching refs:ARGV

65 while(@ARGV) {
66     if($ARGV[0] eq '--pidfile') {
67         if($ARGV[1]) {
68             $pidfile = $ARGV[1];
69             shift @ARGV;
72     elsif($ARGV[0] eq '--portfile') {
73         if($ARGV[1]) {
74             $portfile = $ARGV[1];
75             shift @ARGV;
78     elsif($ARGV[0] eq '--config') {
79         if($ARGV[1]) {
80             $cmdfile = $ARGV[1];
81             shift @ARGV;
84     elsif($ARGV[0] eq '--logfile') {
85         if($ARGV[1]) {
86             $logfile = $ARGV[1];
87             shift @ARGV;
90     elsif($ARGV[0] eq '--logdir') {
91         if($ARGV[1]) {
92             $logdir = $ARGV[1];
93             shift @ARGV;
96     elsif($ARGV[0] eq '--srcdir') {
97         if($ARGV[1]) {
98             $srcdir = $ARGV[1];
99             shift @ARGV;
102     elsif($ARGV[0] eq '--ipv4') {
105     elsif($ARGV[0] eq '--ipv6') {
108     elsif($ARGV[0] eq '--unix-socket') {
110         if($ARGV[1]) {
111             $unix_socket = $ARGV[1];
112             shift @ARGV;
115     elsif($ARGV[0] eq '--gopher') {
118     elsif($ARGV[0] eq '--port') {
119         if($ARGV[1] =~ /^(\d+)$/) {
121             shift @ARGV;
124     elsif($ARGV[0] eq '--connect') {
125         if($ARGV[1]) {
126             $connect = $ARGV[1];
127             shift @ARGV;
130     elsif($ARGV[0] eq '--keepalive') {
131         if($ARGV[1]) {
132             $keepalive_secs = $ARGV[1];
133             shift @ARGV;
136     elsif($ARGV[0] eq '--id') {
137         if($ARGV[1] =~ /^(\d+)$/) {
139             shift @ARGV;
142     elsif($ARGV[0] eq '--verbose') {
146         print STDERR "\nWarning: http-server.pl unknown parameter: $ARGV[0]\n";
148     shift @ARGV;