line |
true |
false |
branch |
13
|
0 |
6 |
if ($^O =~ /Win32/) { } |
17
|
0 |
0 |
if ($OS =~ /^WIN95/) { } |
|
0 |
0 |
elsif ($OS =~ /^WIN98/) { } |
|
0 |
0 |
elsif ($OS =~ /^WINME/) { } |
|
0 |
0 |
elsif ($OS =~ /^WINNT/) { } |
|
0 |
0 |
elsif ($OS =~ /^WIN2000/) { } |
|
0 |
0 |
elsif ($OS =~ /^WIN2003/) { } |
|
0 |
0 |
elsif ($OS =~ /^WINXP/) { } |
|
0 |
0 |
elsif ($OS =~ /^WINCE/) { } |
|
0 |
0 |
elsif ($OS =~ /^WIN7/) { } |
59
|
0 |
6 |
if (defined $fn) |
60
|
0 |
0 |
$write || -f $fn ? : |
68
|
0 |
0 |
unless defined $fn |
76
|
0 |
0 |
unless defined $fn |
84
|
1 |
8 |
if (exists $opts{'name'}) { } |
|
8 |
0 |
elsif (exists $opts{'names'}) { } |
87
|
1 |
7 |
unless UNIVERSAL::isa($opts{'names'}, 'ARRAY') |
95
|
4 |
4 |
if (exists $opts{'mode'}) |
96
|
1 |
3 |
if ($opts{'mode'} =~ /^r(ead)?$/i) { } |
|
2 |
1 |
elsif ($opts{'mode'} =~ /w(rite)?$/i) { } |
106
|
2 |
5 |
if (exists $opts{'scope'}) |
107
|
0 |
2 |
if ($opts{'scope'} =~ /^u(ser)?$/i) { } |
|
1 |
1 |
elsif ($opts{'scope'} =~ /g(lobal)?$/i) { } |