| line |
l |
!l&&r |
!l&&!r |
condition |
|
109
|
0 |
828 |
0 |
$_[1] // (builtin::blessed($_[0]) ? $_[0]->name : &panic()) |
|
116
|
21 |
0 |
0 |
shift() || select() |
|
127
|
5 |
0 |
0 |
shift() || $default_wrap_length |
|
227
|
25 |
1 |
127 |
s/\b$attr\s*=\s*"(?>[^\\"]|\\.){0,1000}"/$attr="$quoted"/i or s/\b$attr\s*=\s*[^;\s]*/$attr="$quoted"/i |
|
343
|
6 |
1 |
6 |
$obj->isa("Mail::Identity") or $obj->isa("User::Identity") |
|
386
|
12 |
1431 |
0 |
shift() || $default_wrap_length |
|
402
|
21 |
30 |
4 |
$line =~ s/^ ( .{$min,$max} # $max to 30 chars
[;,] # followed at a ; or ,
)[ \t] # and then a WSP
//x or $line =~ s/^ ( .{$min,$max} ) # $max to 30 chars
[ \t] # followed by a WSP
//x |
|
|
51 |
1 |
3 |
$line =~ s/^ ( .{$min,$max} # $max to 30 chars
[;,] # followed at a ; or ,
)[ \t] # and then a WSP
//x or $line =~ s/^ ( .{$min,$max} ) # $max to 30 chars
[ \t] # followed by a WSP
//x or $line =~ s/^ ( .{$max,}? ) # longer, but minimal chars
[ \t] # followed by a WSP
//x |