my $old_stderr = *STDERR;