Branch Coverage

blib/lib/Perl/Signature.pm
Criterion Covered Total %
branch 19 36 52.7


line true false branch
82 25 4 ref $_[0] ? :
83 29 0 -f $_[0] ? :
84 0 29 unless my $Document = 'PPI::Document'->new($filename)
101 0 2 ref $_[0] ? :
102 2 0 defined $_[0] ? :
103 0 2 if ref $source
106 0 2 unless my $Document = 'PPI::Document'->new(\$source)
122 0 32 ref $_[0] ? :
123 0 32 unless my $Document = _Document(shift())
126 0 32 unless my $Normalized = $Document->normalized
130 0 32 unless defined $string
133 0 32 unless Digest::MD5::md5_hex($string)
159 0 3 ref $_[0] ? :
160 3 0 -f $_[0] ? :
163 0 3 unless my $signature = $class->file_signature($file)
197 0 25 unless -f $self->file
226 0 11 unless my $current = $self->current
244 0 4 unless my $current = $self->current