Home | History | Annotate | Download | only in tests

Lines Matching refs:ARGV

53 while(@ARGV) {
54 if($ARGV[0] eq '--pidfile') {
55 if($ARGV[1]) {
56 $pidfile = $ARGV[1];
57 shift @ARGV;
60 elsif($ARGV[0] eq '--logfile') {
61 if($ARGV[1]) {
62 $logfile = $ARGV[1];
63 shift @ARGV;
66 elsif($ARGV[0] eq '--srcdir') {
67 if($ARGV[1]) {
68 $srcdir = $ARGV[1];
69 shift @ARGV;
72 elsif($ARGV[0] eq '--ipv4') {
75 elsif($ARGV[0] eq '--ipv6') {
78 elsif($ARGV[0] eq '--unix-socket') {
80 if($ARGV[1]) {
81 $unix_socket = $ARGV[1];
82 shift @ARGV;
85 elsif($ARGV[0] eq '--gopher') {
88 elsif($ARGV[0] eq '--port') {
89 if($ARGV[1] =~ /^(\d+)$/) {
91 shift @ARGV;
94 elsif($ARGV[0] eq '--connect') {
95 if($ARGV[1]) {
96 $connect = $ARGV[1];
97 shift @ARGV;
100 elsif($ARGV[0] eq '--id') {
101 if($ARGV[1] =~ /^(\d+)$/) {
103 shift @ARGV;
106 elsif($ARGV[0] eq '--verbose') {
110 print STDERR "\nWarning: httpserver.pl unknown parameter: $ARGV[0]\n";
112 shift @ARGV;