# save STDOUT
open my $stdout, '>&STDOUT';

# close it
open STDOUT, '>', undef;

# don't display system's STDOUT (but it's STDERR!)
system '...';

# reopen STDOUT
open STDOUT, '>&', $stdout;