Condition Coverage

blib/lib/MooX/Purple.pm
Criterion Covered Total %
condition 27 60 45.0


and 3 conditions

line !l l&&!r l&&r condition
52 0 0 0 $arg =~ /\S/ and $arg =~ /(?:(?&PerlOWS)(?:(?xms: (?: allow (?&PerlNWS) (?:(?!qw)(?&PerlQualifiedIdentifier)| (?&PerlList)) | with (?&PerlNWS) (?:(?!qw)(?&PerlPrefixUnaryOperator)*(?&PerlQualifiedIdentifier)| (?&PerlList)) | is (?&PerlNWS) (?:(?!qw)(?&PerlPrefixUnaryOperator)*(?&PerlQualifiedIdentifier)| (?&PerlList)) | use (?&PerlNWS) (?:(?&PerlQualifiedIdentifier)\s*(?&PerlList)|(?:(?!qw)(?&PerlQualifiedIdentifier)| (?&PerlList))) )?+ )))$PPR::GRAMMAR/g
3 4 12 $arg =~ /\S/ and $arg =~ /(?:(?&PerlOWS)(?:(?xms: (?: allow (?&PerlNWS) (?:(?!qw)(?&PerlQualifiedIdentifier)| (?&PerlList)) | with (?&PerlNWS) (?:(?!qw)(?&PerlPrefixUnaryOperator)*(?&PerlQualifiedIdentifier)| (?&PerlList)) | is (?&PerlNWS) (?:(?!qw)(?&PerlPrefixUnaryOperator)*(?&PerlQualifiedIdentifier)| (?&PerlList)) | use (?&PerlNWS) (?:(?&PerlQualifiedIdentifier)\s*(?&PerlList)|(?:(?!qw)(?&PerlQualifiedIdentifier)| (?&PerlList))) )?+ )))$PPR::GRAMMAR/g
59 0 0 0 $arg =~ /\S/ and $arg =~ /(?:(?&PerlOWS)(?:(?xms: (?: allow (?&PerlNWS) (?:(?!qw)(?&PerlQualifiedIdentifier)| (?&PerlList)) | with (?&PerlNWS) (?:(?!qw)(?&PerlPrefixUnaryOperator)*(?&PerlQualifiedIdentifier)| (?&PerlList)) | is (?&PerlNWS) (?:(?!qw)(?&PerlPrefixUnaryOperator)*(?&PerlQualifiedIdentifier)| (?&PerlList)) | use (?&PerlNWS) (?:(?&PerlQualifiedIdentifier)\s*(?&PerlList)|(?:(?!qw)(?&PerlQualifiedIdentifier)| (?&PerlList))) )?+ )))$PPR::GRAMMAR/g
0 0 0 $arg =~ /\S/ and $arg =~ /(?:(?&PerlOWS)(?:(?xms: (?: allow (?&PerlNWS) (?:(?!qw)(?&PerlQualifiedIdentifier)| (?&PerlList)) | with (?&PerlNWS) (?:(?!qw)(?&PerlPrefixUnaryOperator)*(?&PerlQualifiedIdentifier)| (?&PerlList)) | is (?&PerlNWS) (?:(?!qw)(?&PerlPrefixUnaryOperator)*(?&PerlQualifiedIdentifier)| (?&PerlList)) | use (?&PerlNWS) (?:(?&PerlQualifiedIdentifier)\s*(?&PerlList)|(?:(?!qw)(?&PerlQualifiedIdentifier)| (?&PerlList))) )?+ )))$PPR::GRAMMAR/g
9 0 0 $arg =~ /\S/ and $arg =~ /(?:(?&PerlOWS)(?:(?xms: (?: allow (?&PerlNWS) (?:(?!qw)(?&PerlQualifiedIdentifier)| (?&PerlList)) | with (?&PerlNWS) (?:(?!qw)(?&PerlPrefixUnaryOperator)*(?&PerlQualifiedIdentifier)| (?&PerlList)) | is (?&PerlNWS) (?:(?!qw)(?&PerlPrefixUnaryOperator)*(?&PerlQualifiedIdentifier)| (?&PerlList)) | use (?&PerlNWS) (?:(?&PerlQualifiedIdentifier)\s*(?&PerlList)|(?:(?!qw)(?&PerlQualifiedIdentifier)| (?&PerlList))) )?+ )))$PPR::GRAMMAR/g
3 9 25 $arg =~ /\S/ and $arg =~ /(?:(?&PerlOWS)(?:(?xms: (?: allow (?&PerlNWS) (?:(?!qw)(?&PerlQualifiedIdentifier)| (?&PerlList)) | with (?&PerlNWS) (?:(?!qw)(?&PerlPrefixUnaryOperator)*(?&PerlQualifiedIdentifier)| (?&PerlList)) | is (?&PerlNWS) (?:(?!qw)(?&PerlPrefixUnaryOperator)*(?&PerlQualifiedIdentifier)| (?&PerlList)) | use (?&PerlNWS) (?:(?&PerlQualifiedIdentifier)\s*(?&PerlList)|(?:(?!qw)(?&PerlQualifiedIdentifier)| (?&PerlList))) )?+ )))$PPR::GRAMMAR/g
66 0 0 0 $arg =~ /\S/ and $arg =~ /(?:(?&PerlOWS)(?:(?xms: (?: allow (?&PerlNWS) (?:(?!qw)(?&PerlQualifiedIdentifier)| (?&PerlList)) | with (?&PerlNWS) (?:(?!qw)(?&PerlPrefixUnaryOperator)*(?&PerlQualifiedIdentifier)| (?&PerlList)) | is (?&PerlNWS) (?:(?!qw)(?&PerlPrefixUnaryOperator)*(?&PerlQualifiedIdentifier)| (?&PerlList)) | use (?&PerlNWS) (?:(?&PerlQualifiedIdentifier)\s*(?&PerlList)|(?:(?!qw)(?&PerlQualifiedIdentifier)| (?&PerlList))) )?+ )))$PPR::GRAMMAR/g
1 5 10 $arg =~ /\S/ and $arg =~ /(?:(?&PerlOWS)(?:(?xms: (?: allow (?&PerlNWS) (?:(?!qw)(?&PerlQualifiedIdentifier)| (?&PerlList)) | with (?&PerlNWS) (?:(?!qw)(?&PerlPrefixUnaryOperator)*(?&PerlQualifiedIdentifier)| (?&PerlList)) | is (?&PerlNWS) (?:(?!qw)(?&PerlPrefixUnaryOperator)*(?&PerlQualifiedIdentifier)| (?&PerlList)) | use (?&PerlNWS) (?:(?&PerlQualifiedIdentifier)\s*(?&PerlList)|(?:(?!qw)(?&PerlQualifiedIdentifier)| (?&PerlList))) )?+ )))$PPR::GRAMMAR/g
73 0 0 0 $arg =~ /\S/ and $arg =~ /(?:(?&PerlOWS)(?:(?xms: (?: allow (?&PerlNWS) (?:(?!qw)(?&PerlQualifiedIdentifier)| (?&PerlList)) | )?+ )))$PPR::GRAMMAR/g
0 6 12 $arg =~ /\S/ and $arg =~ /(?:(?&PerlOWS)(?:(?xms: (?: allow (?&PerlNWS) (?:(?!qw)(?&PerlQualifiedIdentifier)| (?&PerlList)) | )?+ )))$PPR::GRAMMAR/g
80 0 0 0 $arg =~ /\S/ and $arg =~ /(?:(?&PerlOWS)(?:(?xms: (?: describe (?&PerlNWS) (?:(?&PerlString)) )?+ )))$PPR::GRAMMAR/g
27 2 4 $arg =~ /\S/ and $arg =~ /(?:(?&PerlOWS)(?:(?xms: (?: describe (?&PerlNWS) (?:(?&PerlString)) )?+ )))$PPR::GRAMMAR/g

or 2 conditions

line l !l condition
46 14 0 (caller 0)[3] // ''
49 14 0 (caller 0)[3] // ''
53 14 0 (caller 0)[3] // ''
56 14 0 (caller 0)[3] // ''
60 14 0 (caller 0)[3] // ''
64 14 0 (caller 0)[3] // ''
67 14 0 (caller 0)[3] // ''
70 14 0 (caller 0)[3] // ''
73 14 0 (caller 0)[3] // ''
76 14 0 (caller 0)[3] // ''
79 14 0 (caller 0)[3] // ''
82 14 0 (caller 0)[3] // ''