Branch Coverage

blib/lib/junk.pm

Criterion	Covered	Total	%
branch	6	8	75.0

line	true	false	branch
5	2	2	unless my $class = shift()
	1	1	unless (@_)
7	0	1	if $x =~ m[[^A-Za-z0-9\+\/\=]]
9	0	1	if $ENV{'PERL_JUNK_DEBUG'}