File Coverage

blib/lib/Object/NulStr.pm
Criterion Covered Total %
statement 8 8 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 0 1 0.0
total 12 13 92.3


line stmt bran cond sub pod time code
1             package Object::NulStr;
2              
3 1     1   23074 use 5.010001;
  1         3  
  1         62  
4              
5             our $VERSION = '0.02'; # VERSION
6              
7 1     1   1730 use overload q{""} => sub { "\0" };
  1     2   1078  
  1         9  
  2         45  
8              
9 1     1 0 13 sub new { bless(\"$_[0]", $_[0]) }
10              
11             1;
12             # ABSTRACT: Object which stringifies to NUL character ("\0")
13              
14             __END__