line |
true |
false |
branch |
19
|
0 |
4 |
_is_arrayref($opts{'path'}) ? : |
|
3 |
1 |
_is_arrayref($opts{'exec'}) ? : |
|
0 |
4 |
delete $opts{'quiet'} ? : |
|
0 |
4 |
delete $opts{'pipe'} ? : |
26
|
1 |
3 |
unless ($args{'exec'}) |
27
|
0 |
1 |
defined $opts{'exec'} ? : |
|
0 |
1 |
ref $opts{'exec'} ? : |
44
|
0 |
1 |
if ($opts{'help'} or scalar @{$opts{'exec'};} == 0) |
49
|
0 |
1 |
$opts{'quiet'} ? : |
|
0 |
1 |
$opts{'pipe'} ? : |
62
|
0 |
0 |
unless $$self{'quiet'} |
69
|
0 |
0 |
if (my $pid = fork) { } |
|
0 |
0 |
elsif ($pid == 0) { } |
94
|
0 |
0 |
if $ENV{'PFSWATCH_DEBUG'} |
96
|
0 |
0 |
unless ($$e{'path'} =~ /$ignored_pattern/) |
101
|
0 |
0 |
if (scalar @files > 0) |
102
|
0 |
0 |
unless $$self{'quiet'} |
104
|
0 |
0 |
if ($$self{'pipe'}) { } |
105
|
0 |
0 |
unless open my $child_stdin, '|-', @cmd |
108
|
0 |
0 |
unless close $child_stdin |
112
|
0 |
0 |
unless exec @cmd |
128
|
3 |
5 |
if ($arg =~ /$exec_re/) { } |
151
|
3 |
5 |
$v && ref $v eq 'ARRAY' && scalar @$v > 0 ? : |