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;