# $@ being the shell's quoted argument list
perl program1 $@ | perl program2

##</code><code>##

# program1.pl
...
print while(<SOMETHING>);

# program2.pl (which is reading program1.pl's output)
...
while(my $line = <STDIN>) {
    do_something($line);
}