If what you're doing is fork-friendly (i.e. doesn't involve modifying global variables), Perl has a built-in syntax just for you -- with open. (This sort of thing, by the way, is why I occasionally reread the perl PODs.) 
  #foo() is the sub that outputs a lot of data
  my $pid = open(SUBOUT, '-|');
  defined($pid) or die "Fork failed: $!";
  if ($pid == 0) { 
    $|=1; foo(); exit(0);
  }
  while (<SUBOUT>) ...

[download]
The open will fork your script, and the forked copy (the one that calls the function) will have its STDOUT piped to the filehandle given to open() (in this case, SUBOUT).
Here's a quick example I crafted: 
#!/usr/bin/perl -l
defined($tmp = open(FOO, '-|')) or die "Can't fork: $!";

if ($tmp==0) {
        print "Roses are red\nViolets are blue\nI think Perl rules\nAn
+d you should too\n";
        exit(1);
}

print for map {chomp; "[$tmp] {$_}"} <FOO>;

[download]
--Stevie-O 
$"=$,,$_=q>|\p4<6 8p<M/_|<('=>
.q>.<4-KI<l|2$<6%s!<qn#F<>;$,
.=pack'N*',"@{[unpack'C*',$_]
}"for split/</;$_=$,,y[A-Z a-z]
         {}cd;print lc

[download]

In reply to Re: Streaming to Handles by Stevie-O
in thread Streaming to Handles by crabbdean

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.