Re: running a perl file from within a perl file

in reply to running a perl file from within a perl file

# 813119.pl:
my @args=(0);
my $ filename = "ABC.pl";
@args = ("$filename com1@115200 65");
system(@args) == 0 or die "system @args failed: $?";
[download]

# ABC.pl:
print join( ' / ', @ARGV), "\n";
[download]

Mostly works for me. ABC.pl gets called, and displays

com1 / 65
[download]

I'd recommend quoting the '@' character in your @args assignment, as in:

@args = ("$filename com1\@115200 65");
[download]

Which changes the output to

com1@115200 / 65
[download]

What output are you seeing? Which version of perl (perl -V)?

Comment on Re: running a perl file from within a perl file Select or Download Code

Replies are listed 'Best First'.
Re^2: running a perl file from within a perl file by perly_newbie (Novice) on Dec 18, 2009 at 03:41 UTC
Hey thanks, for the reply I got it to work.	[reply]

In Section Seekers of Perl Wisdom