Lines Matching refs:ARGV

50 while(@ARGV) {
51     if($ARGV[0] eq '--pidfile') {
52         if($ARGV[1]) {
53             $pidfile = $ARGV[1];
54             shift @ARGV;
57     elsif($ARGV[0] eq '--logfile') {
58         if($ARGV[1]) {
59             $logfile = $ARGV[1];
60             shift @ARGV;
63     elsif($ARGV[0] eq '--srcdir') {
64         if($ARGV[1]) {
65             $srcdir = $ARGV[1];
66             shift @ARGV;
69     elsif($ARGV[0] eq '--ipv4') {
72     elsif($ARGV[0] eq '--ipv6') {
75     elsif($ARGV[0] eq '--port') {
76         if($ARGV[1] =~ /^(\d+)$/) {
78             shift @ARGV;
81     elsif($ARGV[0] eq '--id') {
82         if($ARGV[1] =~ /^(\d+)$/) {
84             shift @ARGV;
87     elsif($ARGV[0] eq '--verbose') {
91         print STDERR "\nWarning: rtspserver.pl unknown parameter: $ARGV[0]\n";
93     shift @ARGV;