in reply to Reading only STDERR

Not strictly a Perl solution, but using the rediction features of Unix shell: 
my $STDERR_of_program = `program 2>&1 >/dev/null`;

[download]

In Section Seekers of Perl Wisdom