Lines Matching refs:ARGV
98 while(@ARGV) {
99 if($ARGV[0] eq '--verbose') {
102 elsif($ARGV[0] eq '--proto') {
103 if($ARGV[1]) {
104 $proto = $ARGV[1];
105 shift @ARGV;
108 elsif($ARGV[0] eq '--accept') {
109 if($ARGV[1]) {
110 if($ARGV[1] =~ /^(\d+)$/) {
112 shift @ARGV;
116 elsif($ARGV[0] eq '--connect') {
117 if($ARGV[1]) {
118 if($ARGV[1] =~ /^(\d+)$/) {
120 shift @ARGV;
124 elsif($ARGV[0] eq '--stunnel') {
125 if($ARGV[1]) {
126 $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;
168 elsif($ARGV[0] eq '--logdir') {
169 if($ARGV[1]) {
170 $logdir = "$path/". $ARGV[1];
171 shift @ARGV;
175 print STDERR "\nWarning: secureserver.pl unknown parameter: $ARGV[0]\n";
177 shift @ARGV;