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 |