Branch Coverage

blib/lib/Text/Shortcuts.pm

Criterion	Covered	Total	%
branch	4	8	50.0

line	true	false	branch
14	0	1	unless (-s $$self{'SF'})
33	1	1	if ($char eq $shortcut)
39	0	1	unless ($is_taken)
63	0	0	if $line =~ /^(end)$/