{
    open local(*STDOUT), '>', '/dev/null' or die $!;
   #...
    close STDOUT or die $!;
}
# STDOUT is restored here