Lines Matching refs:ARGV
93 while(@ARGV) {
94 if($ARGV[0] eq '--verbose') {
97 elsif($ARGV[0] eq '--proto') {
98 if($ARGV[1]) {
99 $proto = $ARGV[1];
100 shift @ARGV;
103 elsif($ARGV[0] eq '--accept') {
104 if($ARGV[1]) {
105 if($ARGV[1] =~ /^(\d+)$/) {
107 shift @ARGV;
111 elsif($ARGV[0] eq '--connect') {
112 if($ARGV[1]) {
113 if($ARGV[1] =~ /^(\d+)$/) {
115 shift @ARGV;
119 elsif($ARGV[0] eq '--stunnel') {
120 if($ARGV[1]) {
121 if($ARGV[1] =~ /^([\w\/]+)$/) {
122 $stunnel = $ARGV[1];
125 $stunnel = "\"". $ARGV[1] ."\"";
127 shift @ARGV;
130 elsif($ARGV[0] eq '--srcdir') {
131 if($ARGV[1]) {
132 $srcdir = $ARGV[1];
133 shift @ARGV;
136 elsif($ARGV[0] eq '--certfile') {
137 if($ARGV[1]) {
138 $stuncert = $ARGV[1];
139 shift @ARGV;
142 elsif($ARGV[0] eq '--id') {
143 if($ARGV[1]) {
144 if($ARGV[1] =~ /^(\d+)$/) {
146 shift @ARGV;
150 elsif($ARGV[0] eq '--ipv4') {
153 elsif($ARGV[0] eq '--ipv6') {
156 elsif($ARGV[0] eq '--pidfile') {
157 if($ARGV[1]) {
158 $pidfile = "$path/". $ARGV[1];
159 shift @ARGV;
162 elsif($ARGV[0] eq '--logfile') {
163 if($ARGV[1]) {
164 $logfile = "$path/". $ARGV[1];
165 shift @ARGV;
169 print STDERR "\nWarning: secureserver.pl unknown parameter: $ARGV[0]\n";
171 shift @ARGV;
