What's wrong with a "system" call?
system "quote rcmd call pgm(ss0mod99/A00099X)
parm('myfile.txt')";
should do the trick, unless you need to capture the
output, in which case use backticks:
my @results = `quote rcmd call pgm(ss0mod99/A00099X)
parm('myfile.txt')`;
--- Wening Andreas <[EMAIL PROTECTED]>
wrote:
> Hi there,
>
> I rewrite a script from Windows NT shell to Perl.
> The script transfers some
> files and send an command to an AS400 ftp server.
> The command looks like
> this: "quote rcmd call pgm(ss0mod99/A00099X)
> parm('myfile.txt')".
> That's exactly what you would write on the command
> line to send a command to
> the AS400.
>
> In Perl there is the "quot (CMD [,ARGS])" Method.
> Does anybody how to put
> the command above in this method? I mean what are
> the "CMD" and what the
> "ARGS"?
>
> Thx, for help,
> Andreas
> _______________________________________________
> ActivePerl mailing list
> [EMAIL PROTECTED]
> To unsubscribe:
http://listserv.ActiveState.com/mailman/listinfo/activeperl
=====
------------------------------------
Jeffrey Hottle
nkuvu at yahoo dot com
__________________________________________________
Do You Yahoo!?
Great stuff seeking new owners in Yahoo! Auctions!
http://auctions.yahoo.com
_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/listinfo/activeperl
