Branch Coverage

blib/lib/Acme/TLDR.pm

Criterion	Covered	Total	%
branch	12	16	75.0

line	true	false	branch
36	605	605	if exists $ENV{'DEBUG'}
51	2	0	if (not defined $updated or grep {-M _ < $updated if -e $_;} map({catfile($_, 'perllocal.pod');} @INC)) { }
52	0	0	if -e $_
65	0	2	unless exists $ENV{'NOCACHE'}
82	150	1280	unless $#parts
84	2466	4730	/^(\w)\w{3,}$/x ? :
85	74	1206	if $short eq $long
87	1098	108	if (not exists $collisions{$short}) { }