in reply to Tips for quieting test exception output?
So turns out Net::OpenSSH has a way to discard errors sent to STDERR.
So doing this:
throws_ok { my $wsr = WebServerRemote->new(ssh => 'me@10.0.300.99', ma +ster_stderr_discard =>1) } qr {could not connect}, 'complains if unable to connect';
along with some proper argument handling, did the trick.
$PM = "Perl Monk's";
$MCF = "Most Clueless Friar Abbot Bishop Pontiff Deacon Curate";
$nysus = $PM . ' ' . $MCF;
Click here if you love Perl Monks
|
|---|