Perl file handle question...

[Ed Eddington]

Any ideas about this? I want to grab STDOUT from a Perl script within the 
same script and do some processing on it. It would be easy if I could just 
select a filehandle at the beginning of the script so all the print 
statements would print to this filehandle. Seems like there should be a way 
to do this in memory without actually printing to a file and then 
reopening. This does NOT work...


#!/usr/bin/perl

select HANDLE;
$|=1;

print 'This is printing to the HANDLE';

select STDOUT;

$text = <HANDLE>;

print "This from the HANDLE: $text\n";                 #<-- $text is 
empty!!



If anyone knows a neat way to do this, please let me know.
Thanks!
Ed