in reply to Re: calling a perl script within a perl script
in thread calling a perl script within a perl script

`perl /home/com/begp/test_script.pl $f` || die "Error!";

[download]
I have changed the positioning of the backtick...but it still errors. Also, the test_script does not return a zero.

Replies are listed 'Best First'.
Re^3: calling a perl script within a perl script
by sk (Curate) on Nov 27, 2005 at 03:52 UTC
    You got to give us more information on the error (can you post the error?). if you are talking about your die erroring out then you you need to check if your program (test_script.pl) worked or not before you debug the one you posted. The code you had and the one i posted work just fine for me (with the modification).

    Also couple of things -

    1. Can you run your test script on the command line with an argument does it work? can you do that with a * (shell wild-card) does it work?

    2. Do something like  my $ret = `perl test_script.pl $f`; and then print out $ret for each file.

    Make sure you have  use warnings

    Hope this helps.

    -SK

    Update: Thanks sgifford! It is a good point and I think that could be the reason why the script is failing.

    sbp, Actually tho, i am wondering why would you even need this wrapper script? Can't you just do test_script.pl * on the directory you want?

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom