At 05:18 PM 09/25/02 -0400, Paul Borghese wrote:
>           push @SwishCmd, @SwishProg, '|';

>        system @SwishCmd;

When you pass system an array it bypasses the shell.  Stringify:

         system "@SwishCmd";

If in doubt add this to your program:

   print STDERR "Argv:\n", join( "\n", @ARGV, '');

I'd probably want to capture output and report errors:

        open SWISH, "./prog.pl | ./swish-e -S prog -i stdin |" or die $!;
        local $/ = undef;
        my $output = <SWISH>;

        if ( close SWISH ) {
            print "OK";
            
        } else {
            print "Error\n$output\n";
        }






-- 
Bill Moseley
mailto:moseley@hank.org