open PROG "perl foo.pl param1 | " or die "...";

##</code><code>##

perl foo.perl param1 | perl bar.pl | perl tins.pl > result.txt