in reply to call a program inside another program

There are different ways of calling other programs depending on whether the child should run in parallel or not, whether the child's output should be captured or not, etc.

If you want to wait for the child program to finish executing before continuing, and you don't need to capture it's output or feed anything to it's STDIN, then you can use system. 

Windows:
system('program2.pl "username" "userid"');

Elsewhere:
system('program2.pl', 'username', 'userid');

[download]

Refer to system's documentation for more info including how to check if an error occured.

Replies are listed 'Best First'.
Re^2: call a program inside another program
by Anonymous Monk on Sep 06, 2007 at 11:22 UTC
    You can also call system with a list on Win32: 

    C:\>perl -e "system(qw/skript.pl 1 2 3/)"
1
2
3

    [download]
[reply]
[d/l]

      But system(LIST) is implemented as a barely disguised system(STRING). The below example tries to pass a string containing double quotes ('4 " and " 5') to a child Perl interpreter which prints out its @ARGV:

      Q:\>perl -e "$q=chr(34);system($^X, '-le', 'print for @ARGV', 1, 2, 3,
+qq(4 $q and $q 5))"
1
2
3
4
 and
5

      [download]

      There would be ways to make system(LIST) saner but as the underlying OS call basically is system(STRING) and there is no central library routine for or consensus on deparsing the command line, and even the various MSVCRTs differ in how they deparse the command line, it's kinda hard.

[reply]
[d/l]
[select]
      In Linux OS
if I use code 
system('program2.pl', 'username', 'userid');

How can I catch those values in program2.pl?

      [download]
[reply]
[d/l]

        See perlvar. You find the arguments in the @ARGV variable.

[reply]
[d/l]
Re^2: call a program inside another program
by Anonymous Monk on Sep 06, 2007 at 05:10 UTC
    Thanks a lot
[reply]

In Section Seekers of Perl Wisdom