File Coverage

blib/lib/POE/Component/SmokeBox/Backend/Test/Idle.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1             package POE::Component::SmokeBox::Backend::Test::Idle;
2             $POE::Component::SmokeBox::Backend::Test::Idle::VERSION = '0.54';
3             #ABSTRACT: a backend to test idle kills.
4              
5 7     7   54 use strict;
  7         17  
  7         297  
6 7     7   45 use warnings;
  7         14  
  7         352  
7 7     7   63 use base qw(POE::Component::SmokeBox::Backend::Base);
  7         18  
  7         3175  
8              
9             sub _data {
10 34     34   76 my $self = shift;
11             $self->{_data} =
12             {
13 34         263 check => [ '-e', 1 ],
14             index => [ '-e', 1 ],
15             smoke => [ '-e', '$|=1; my $module = shift; print $module, qq{\n}; sleep 60;' ],
16             };
17 34         109 return;
18             }
19              
20             1;
21              
22             __END__