File Coverage

blib/lib/HH/Unispool/Config/File/Token/Numbered/Device/4.pm
Criterion Covered Total %
statement 48 48 100.0
branch 6 12 50.0
condition 8 16 50.0
subroutine 9 9 100.0
pod 2 2 100.0
total 73 87 83.9


line stmt bran cond sub pod time code
1             package HH::Unispool::Config::File::Token::Numbered::Device::4;
2              
3 9     9   6750 use 5.006;
  9         32  
  9         405  
4 9     9   52 use base qw( HH::Unispool::Config::File::Token::Numbered::Device );
  9         21  
  9         1752  
5 9     9   56 use strict;
  9         19  
  9         333  
6 9     9   65 use warnings;
  9         28  
  9         322  
7 9     9   57 use AutoLoader qw(AUTOLOAD);
  9         26  
  9         77  
8 9     9   332 use Error qw(:try);
  9         22  
  9         79  
9 9     9   1653 use HH::Unispool::Config::File::Token qw( :rx :frm );
  9         22  
  9         7453  
10              
11             # Package version
12             our ($VERSION) = '$Revision: 0.3 $' =~ /\$Revision:\s+([^\s]+)/;
13              
14             1;
15              
16             __END__