Branch Coverage

blib/lib/Sub/Filter.pm

Criterion	Covered	Total	%
branch	3	10	30.0

line	true	false	branch
88	4	1	if (exists $SUB_EXPORT_OK{$_}) { }
	1	0	elsif ($_ eq 'filter_return') { }
153	0	0	unless defined $arg
155	0	0	if ($arg =~ /\A[A-Za-z_][0-9A-Za-z_]*\z/) { }
	0	0	elsif ($arg =~ /\A(?:[0-9A-Za-z_]+::)+[A-Za-z_][0-9A-Za-z_]*\z/) { }