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.58';
3             #ABSTRACT: a backend to test idle kills.
4              
5 7     7   61 use strict;
  7         19  
  7         276  
6 7     7   46 use warnings;
  7         16  
  7         298  
7 7     7   44 use base qw(POE::Component::SmokeBox::Backend::Base);
  7         24  
  7         3334  
8              
9             sub _data {
10 34     34   90 my $self = shift;
11             $self->{_data} =
12             {
13 34         261 check => [ '-e', 1 ],
14             index => [ '-e', 1 ],
15             smoke => [ '-e', '$|=1; my $module = shift; print $module, qq{\n}; sleep 60;' ],
16             };
17 34         112 return;
18             }
19              
20             1;
21              
22             __END__