File Coverage

blib/lib/HH/Unispool/Config/File/Token/Numbered/Device/Info.pm
Criterion Covered Total %
statement 44 44 100.0
branch 6 12 50.0
condition 3 4 75.0
subroutine 13 13 100.0
pod 4 4 100.0
total 70 77 90.9


line stmt bran cond sub pod time code
1             package HH::Unispool::Config::File::Token::Numbered::Device::Info;
2              
3 9     9   8417 use 5.006;
  9         30  
  9         387  
4 9     9   50 use base qw( HH::Unispool::Config::File::Token::Numbered );
  9         22  
  9         1594  
5 9     9   51 use strict;
  9         16  
  9         312  
6 9     9   52 use warnings;
  9         16  
  9         301  
7 9     9   49 use AutoLoader qw(AUTOLOAD);
  9         18  
  9         64  
8 9     9   282 use Error qw(:try);
  9         17  
  9         69  
9 9     9   1482 use HH::Unispool::Config::File::Token qw( :rx :frm );
  9         19  
  9         6829  
10              
11             # Package version
12             our ($VERSION) = '$Revision: 0.3 $' =~ /\$Revision:\s+([^\s]+)/;
13              
14             1;
15              
16             __END__