| line |
true |
false |
branch |
|
83
|
0 |
0 |
unless ($Already) |
|
85
|
0 |
0 |
if $@ |
|
100
|
1 |
0 |
defined $^V ? : |
|
|
0 |
1 |
defined &Win32::BuildNumber && defined &Win32::BuildNumber() ? : |
|
|
0 |
1 |
defined $MacPerl::Version ? : |
|
119
|
0 |
201 |
if $count > $PACKAGES_LIMIT |
|
120
|
0 |
201 |
if exists $v{$this} |
|
121
|
1 |
200 |
if $this eq 'main' |
|
125
|
59 |
141 |
if (defined ${$this . '::VERSION';}) { } |
|
|
141 |
0 |
elsif (defined *{$this . '::ISA';} or defined &{$this . '::import';} or $this ne '' and grep {defined *{$_;}{'CODE'} if $] < 5.01 or ref $_ eq 'GLOB';} values %{$this . '::';}) { } |
|
132
|
0 |
0 |
if $] < 5.01 or ref $_ eq 'GLOB' |
|
144
|
199 |
1 |
length $this ? : |
|
145
|
200 |
4151 |
/^(.+)::$/ ? : |
|
152
|
59 |
139 |
defined $v{$p} ? : |