perl pra wrote:
hi All,


I have to call some perl scripts with command line arguements from another
perl script.

(some thing like this)

perl -s  -a  $ENV{X}  -b $ENV{Y} -c $ENV{Z} ;   ( -a , -b, -c  are also the
arguments to call the script)


( the $ENV{x}=C:\xyz\abc,$ENV{Y}=abc,$ENV{Z}=5).



Try this

use Getopt::Std;
use strict;

our ($opt_a, $opt_b, $opt_c);

getopts( 'a:b:c:' );

print join "\n", ($opt_a, $opt_b, $opt_c);

HtH
WayPay


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to