X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Ffilehandles.t;h=a9562ea42c1be5c0ee9200974f96a295ed457fc7;hb=9c3e454c89f701b573ced38188039aba920a8aef;hp=f740318f1a13b1cf02430b3b778e41b247cbcdaa;hpb=65e569ee2c34baaca58c5bfed0301a682eda0739;p=scpubgit%2FSystem-Introspector.git diff --git a/t/filehandles.t b/t/filehandles.t index f740318..a9562ea 100644 --- a/t/filehandles.t +++ b/t/filehandles.t @@ -12,4 +12,13 @@ my $handles = $data->{handles}; ok($handles, 'received filehandle data'); ok(not(grep { not keys %$_ } @$handles), 'keys in all entries'); +do { + my $fail_probe = System::Introspector::Probe::FileHandles->new( + lsof_command => 'lsoffakethisonedoesntexistatleastihopenot', + ); + my $fail_data; + $fail_data = $fail_probe->gather; + ok $fail_data, 'received data'; +}; + done_testing;