Lines Matching refs:ARGV

56 while(@ARGV) {
57     if($ARGV[0] eq '--pidfile') {
58         if($ARGV[1]) {
59             $pidfile = $ARGV[1];
60             shift @ARGV;
63     elsif($ARGV[0] eq '--portfile') {
64         if($ARGV[1]) {
65             $portfile = $ARGV[1];
66             shift @ARGV;
69     elsif($ARGV[0] eq '--logfile') {
70         if($ARGV[1]) {
71             $logfile = $ARGV[1];
72             shift @ARGV;
75     elsif($ARGV[0] eq '--srcdir') {
76         if($ARGV[1]) {
77             $srcdir = $ARGV[1];
78             shift @ARGV;
81     elsif($ARGV[0] eq '--ipv4') {
84     elsif($ARGV[0] eq '--ipv6') {
87     elsif($ARGV[0] eq '--port') {
88         if($ARGV[1] =~ /^(\d+)$/) {
90             shift @ARGV;
93     elsif($ARGV[0] eq '--id') {
94         if($ARGV[1] =~ /^(\d+)$/) {
96             shift @ARGV;
99     elsif($ARGV[0] eq '--verbose') {
103         print STDERR "\nWarning: tftpserver.pl unknown parameter: $ARGV[0]\n";
105     shift @ARGV;