Branch Coverage

blib/lib/PostScript/DecodeGlyphName.pm
Criterion Covered Total %
branch 6 12 50.0


line true false branch
45 6 21 (($digits) = reverse() =~ /$u_notation/) ? :
5 27 (($digits) = /$uni_notation/) ? :
0 32 exists $agl{$_} ? :
52 0 32 /\A(.+?)\./ ? :
65 0 0 unless open my $fh, '<', $_[0]
71 0 0 unless exists $reader{$input_method}