Branch Coverage

blib/lib/Lingua/ZH/Romanize/Pinyin.pm
Criterion Covered Total %
branch 20 30 66.6


line true false branch
104 0 4 unless -r $store
105 0 4 unless my $self = Storable::retrieve($store)
112 0 12 unless $PERL581
115 4 8 if $utf8
117 4 8 if $utf8
124 4 8 unless exists $$self{$char}
131 16 0 $#$_ > 0 ? :
136 0 20 unless $PERL581
139 10 10 if $flag
141 10 10 if ($flag)
143 44 0 if defined $$pair[0]
144 44 0 if defined $$pair[1]
155 88 0 if (defined $1) { }
157 88 0 if exists $$self{$1}
173 0 4 unless $store =~ s/\.pm$/.store/