| blib/lib/IRC/Toolkit/Modes.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 18 | 30 | 60.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 18 | 7 | 0 | 1 | &blessed($array) and $array->isa('IRC::Mode::Set') |
| 21 | 0 | 0 | 8 | ref $array and &reftype($array) eq 'ARRAY' |
| 28 | 0 | 0 | 23 | defined $flag and defined $mode |
| 53 | 0 | 0 | 1 | &blessed($isup) and $isup->can('always') |
| 0 | 0 | 1 | &blessed($isup) and $isup->can('always') and $isup->can('whenset') |
| line | l | !l | condition |
|---|---|---|---|
| 59 | 6 | 3 | $args{'param_always'} ||= [split(//, 'bkohv', 0)] |
| 60 | 0 | 4 | $args{'param_on_set'} || ['l'] |
| 61 | 4 | 5 | $args{'params'} ||= [] |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 60 | 5 | 4 | 0 | $args{'param_set'} ||= $args{'param_on_set'} || ['l'] |
| 80 | 10 | 15 | 32 | $chunk eq '-' or $chunk eq '+' |
| 89 | 14 | 0 | 8 | exists $param_always{$chunk} or exists $param_set{$chunk} |