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