> Hi,
>   I want to pass command line arguements to perl
> program ?
> How to do this ?

They are stored in an array named @ARGV
So ./script.pl -q

You'd say ::

if(defined $ARGV[0] && $ARGV[0] =~ m/^-q$/) { print "I am Q!\n"; }

 
> 
> Thanks
> -Madhu
> 
> 
> __________________________________________________
> Do you Yahoo!?
> Yahoo! Tax Center - File online, calculators, forms, and more 
http://tax.yahoo.com

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to