Branch Coverage

blib/lib/PerlX/Let.pm

Criterion	Covered	Total	%
branch	11	12	91.6

line	true	false	branch
31	2	10	unless defined $name
32	2	8	unless $$ref =~ s/^\s*\=>?\s*//u
34	7	1	unless defined $val
37	5	3	unless (defined $val)
42	0	8	unless defined $val
44	5	3	if (not $val =~ /[\$\@\%\&]/u and $] >= 5.028 || substr($name, 0, 1) eq '$') { }