pipe (STDERR_READER, STDERR_WRITER) or die "Pipes clogged: $!\n";
close STDERR;
open STDERR, ">&STDERR_WRITER" or die "Could not dup STDERR: $!\n";

sub my_output_filter {

  my $line=<STDERR_READER>;
  do_something_funny_and_possibly_even_useful;

}