Condition Coverage

blib/lib/MOP/Method/Attribute.pm
Criterion Covered Total %
condition 3 7 42.8


and 3 conditions

line !l l&&!r l&&r condition
28 0 0 2 scalar @_ == 1 and not ref $_[0]

or 2 conditions

line l !l condition
64 0 1 $arg_splitter ||= sub { split(/\s*(?:\,|\=\>)\s*/, $_[0], 0); }
76 0 1 $arg_processor ||= sub { my $arg = $_[0]; $arg =~ s/\s*$//; $arg =~ s/^['"]//; $arg =~ s/['"]$//; $arg eq 'undef' ? undef : $arg; }