File Coverage

blib/lib/Exception/NoException.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod 1 1 100.0
total 10 10 100.0


line stmt bran cond sub pod time code
1             package Exception::NoException;
2             BEGIN {
3 2     2   62842 $Exception::NoException::VERSION = '0.07';
4             }
5             # ABSTRACT: An exception object that's always false
6              
7 2     2   18 use strict;
  2         3  
  2         266  
8              
9             require Exception::NoException::_obj;
10              
11             sub new {
12 1     1 1 12 my $obj;
13 1         11 return bless \$obj, "$_[0]::_obj";
14             }
15              
16             'The Adventures Of Kung-Fu Jesus and His Amazing Giant Robot';
17              
18             __END__