line |
!l |
l&&!r |
l&&r |
condition |
54
|
0 |
45 |
29 |
ref $x and (ref $x // '') eq (ref $y // '')
|
82
|
0 |
0 |
265 |
$value and &blessed($value)
|
|
0 |
0 |
265 |
$value and &blessed($value) and $value->isa('Types::Algebraic::ADT')
|
238
|
0 |
0 |
0 |
$arg =~ /\S/u and $arg =~ /(?:(?&PerlOWS)(?:(?x: (?<tag> (?&PerlIdentifier)) (?<fields> (?: (?&PerlNWS) : (?&PerlIdentifier) )* ) )))(?=(?<____KD___sep>(?:\|)))?$PPR::GRAMMAR/gu
|
|
0 |
12 |
29 |
$arg =~ /\S/u and $arg =~ /(?:(?&PerlOWS)(?:(?x: (?<tag> (?&PerlIdentifier)) (?<fields> (?: (?&PerlNWS) : (?&PerlIdentifier) )* ) )))(?=(?<____KD___sep>(?:\|)))?$PPR::GRAMMAR/gu
|