other_program arg1 arg2 | your_perl_script

##</code><code>##

while (<>)
{
  # handle each line of data here
}