File Coverage

lib/Devel/ebug/Plugin/Output.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 0 1 0.0
total 16 17 94.1


line stmt bran cond sub pod time code
1             package Devel::ebug::Plugin::Output;
2              
3 19     19   12253 use strict;
  19         34  
  19         568  
4 19     19   90 use warnings;
  19         32  
  19         500  
5 19     19   87 use base qw(Exporter);
  19         33  
  19         3510  
6             our @EXPORT = qw(output);
7              
8             our $VERSION = '0.64'; # VERSION
9              
10             # return stdout, stderr
11             sub output {
12 10     10 0 11384 my($self) = @_;
13 10         54 my $response = $self->talk({ command => "output" });
14 10         221 return ($response->{stdout}, $response->{stderr});
15             }
16              
17              
18             1;
19              
20             __END__