* Greg London <GregLondon at oaktech.com> [2003-03-25 15:31]:
> The original script had a line that said this:
> 
> >if {[catch {exec rsh $linuxMachine "cd $pwd/test/c/$testName; \
> >     make $makeparam >&! log/make.log"} result]} {  ;# exec error
> >     error "\n >>> Can't execute make:\n >>> '$result'\n\n"
> 
> which I translated into this in perl:
> 
> > my $make_command = 
> >      "rsh $linuxMachine "
> >     ."cd $pwd/test/c/$testName;"
> >     ."make $makeparam >&! log/make.log";
> >
> > my $retval = syscmd($make_command);
> >
> > if ($retval) 
> 
> when I run the perl version, I get this:
>        sh: !: bad number

The >&! is csh syntax, not sh.  You'll need to change that to 2>&1 or
invoke system as system("csh -c '$make_command'");

(darren)

-- 
If history teaches us anything, it's that everyone will be part of the
problem, but not everyone will be part of the solution.
    -- Larry Wall

Attachment: pgp00000.pgp
Description: PGP signature

Reply via email to