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} |