| blib/lib/Net/Brcd.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 0 | 38 | 0.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 43 | 0 | 0 | 0 | $user and $pass |
| 134 | 0 | 0 | 0 | $alias and /$_brcd_wwn_re/ |
| 157 | 0 | 0 | 0 | $alias and /($_brcd_port_id)/ |
| 192 | 0 | 0 | 0 | $zone and /\s*(\w[:\w\s;]+)/ |
| 203 | 0 | 0 | 0 | $$fab{'MEMBER'} and $$fab{'ZONE'} |
| 303 | 0 | 0 | 0 | $port_info and $port_info =~ /^(\w-\w+)\s+($_brcd_wwn_re)?/ |
| 477 | 0 | 0 | 0 | $old_zone_object and $new_zone_object |
| line | l | !l | condition |
|---|---|---|---|
| 36 | 0 | 0 | $ENV{'BRCD_USER'} || 'admin' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 26 | 0 | 0 | 0 | ref $class || $class |
| 36 | 0 | 0 | 0 | $user ||= $ENV{'BRCD_USER'} || 'admin' |
| 37 | 0 | 0 | 0 | $pass ||= $ENV{'BRCD_PASS'} |
| 38 | 0 | 0 | 0 | $switch ||= $ENV{'BRCD_SWITCH'} |
| 362 | 0 | 0 | 0 | $self->toSlot($port_number) || $port_number |