Help for this page
use Getopt::Std; our($opt_p); ... my $switch = $opt_p; print "Switch is $switch and arg is $arg\n";
>perl stuff.pl Switch is and arg is # Okay so far... ... >perl stuff.pl -p http://www.proxy.com Switch is http://www.proxy.com and arg is http://www.proxy.com # Shou +ldn't switch equal 1 here too?