{
   local *STDOUT;
   local *STDERR;

   open(STDOUT, ">/dev/null") or
      $log->die("Unable to redirect STDOUT to dev null: $!");

   open(STDERR, ">/dev/null") or
      $log->die("Unable to redirect STDERR to dev null: $!");

   ...
}

##</code><code>##

{
   local *STDOUT;
   local *STDERR;

   ...
}