# execute code within Test::Hump-ish box $self->{-capture}{-stdout}->start(); # STDOUT captured $self->{-capture}{-stderr}->start(); # STDERR captured { try { $self->{-got}{-return} = &$self->{coderef}( $self->{-inparms} ); } catch { $self->{-got}{-evalerr} = $_; }; } $self->{-capture}{-stdout}->stop(); # not captured $self->{-capture}{-stderr}->stop(); # not captured