| line |
true |
false |
branch |
|
114
|
0 |
1 |
if ($^O eq 'cygwin') { } |
|
127
|
1 |
0 |
unless eval {
do {
require Win32;
Win32::IsWinNT() if 'Win32'->can('IsWinNT')
}
} |
|
129
|
0 |
0 |
if 'Win32'->can('IsWinNT') |
|
131
|
0 |
0 |
unless eval {
do {
require Win32::API;
1
}
} |
|
137
|
0 |
0 |
if -e 'File::Spec'->catfile($loc, $dll) |
|
153
|
1 |
0 |
unless eval {
do {
require Proc::ProcessTable;
1
}
} |
|
165
|
0 |
1 |
if _isReactOS() |
|
167
|
1 |
0 |
unless eval {
do {
require Win32::OLE;
1
}
} |
|
178
|
0 |
0 |
if $wmi |
|
183
|
0 |
0 |
unless $wmi |
|
184
|
0 |
0 |
unless $proc |
|
272
|
0 |
0 |
if ref $class |
|
278
|
0 |
0 |
if (ref $inp eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $inp) { } |
|
|
0 |
0 |
elsif ($argnam[$inx]) { } |
|
291
|
0 |
0 |
unless _import_done() |
|
294
|
0 |
0 |
unless my $mach = $arg{'host'} |
|
298
|
0 |
0 |
if ($status = variant_support_status($variant)) |
|
303
|
0 |
0 |
if ($self = $variant_support{$variant}{'make'}->(\%arg)) |
|
340
|
0 |
0 |
unless ref $self |
|
344
|
0 |
0 |
unless exists $self->{$name} |
|
345
|
0 |
0 |
if $name =~ /^_/ |
|
349
|
0 |
0 |
wantarray ? : |
|
384
|
0 |
0 |
if @args % 2 |
|
386
|
0 |
0 |
unless ref $self |
|
393
|
0 |
0 |
unless exists $self->{$name} |
|
395
|
0 |
0 |
unless exists $mutr->{$name} |
|
399
|
0 |
0 |
wantarray ? : |
|
508
|
0 |
0 |
if (exists $variant_support{$_}) { } |
|
515
|
0 |
1 |
if ($idempotent++) { } |
|
518
|
1 |
0 |
unless @vars |
|
520
|
0 |
3 |
unless $variant_support{$try} |
|
584
|
0 |
0 |
unless defined(my $pop = $proc->{'ParentProcessId'}) |
|
587
|
0 |
0 |
unless $prox{$pop} |
|
592
|
0 |
0 |
unless defined $proc->{'CreationDate'} and defined $prox{$pop}{'CreationDate'} and $proc->{'CreationDate'} >= $prox{$pop}{'CreationDate'} |
|
597
|
0 |
0 |
unless $key_found |
|
598
|
0 |
0 |
if (@args) |
|
602
|
0 |
0 |
unless $subs{$pid} |
|
603
|
0 |
0 |
if $listed{$pid} |
|
608
|
0 |
0 |
wantarray ? : |
|
636
|
0 |
0 |
ref $args[0] eq 'HASH' ? : |
|
641
|
0 |
0 |
unless exists $proc->{'ParentProcessId'} |
|
644
|
0 |
0 |
unless defined(my $dad = $subs{$proc->{'ParentProcessId'}}) |
|
646
|
0 |
0 |
unless defined $dad->{'CreationDate'} and defined $proc->{'CreationDate'} |
|
647
|
0 |
0 |
if $dad->{'CreationDate'} > $proc->{'CreationDate'} |
|
650
|
0 |
0 |
unless $bingo |
|
652
|
0 |
0 |
if (@args) { } |
|
653
|
0 |
0 |
exists $subs{$_} ? : |
|
687
|
0 |
3 |
unless my $variant = pop @args |
|
688
|
0 |
3 |
unless exists $variant_support{$variant} |
|
690
|
0 |
3 |
unless _import_done() |
|
724
|
0 |
0 |
if exists $self->{'_xfrm'}{$key} |
|
738
|
0 |
0 |
defined $_ ? : |
|
|
0 |
0 |
if $self->{'elapsed_in_seconds'} |
|
739
|
0 |
0 |
wantarray ? : |
|
756
|
0 |
0 |
if ($_) { } |
|
766
|
0 |
0 |
if wantarray |