Select Code to Download

local( *SAVESTDOUT );
open( SAVESTDOUT, ">&STDOUT" ) or warn "Can't dup STDOUT: $!\n";
...
}
close( STDOUT );
open( STDOUT, ">&SAVESTDOUT ) or warn "Can't dup SAVESTDOUT: $!\n";