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;