my $module = MyModule->new() ;
...
my $out = '' ;
{ local *STDOUT ;
   local *STDERR ;
   open (STDOUT,">>", \$out) ;
   open (STDERR,">>", \$out) ;
   $module->process() ;
}
....