in reply to Redirecting STDOUT and standard error to file

The Perl Cookbook has a nice recipe to copy filehandles. For example: 
open (COPYOUT, ">&STDOUT");
open (COPYERR, ">&STERR");

[download]
This book is *highly* recommended :-)
HTH

In Section Seekers of Perl Wisdom