| line |
true |
false |
branch |
|
24
|
2 |
3 |
if (defined $file) { } |
|
38
|
3 |
0 |
if (open my $out, '>>', $file) { } |
|
39
|
1 |
2 |
unless flock $out, 2 |
|
40
|
0 |
2 |
unless print {$out;} $message . "\n" |
|
41
|
0 |
2 |
unless flock $out, 8 |
|
42
|
0 |
2 |
unless close $out |
|
58
|
4 |
0 |
if (open my $lock, '>>', $tmp_print_file_name) { } |
|
59
|
0 |
4 |
unless flock $lock, 2 |
|
60
|
0 |
4 |
unless print $message . "\n" |
|
61
|
0 |
4 |
unless flock $lock, 8 |
|
62
|
0 |
4 |
unless close $lock |
|
78
|
2 |
0 |
if ($$object{'Verbose'} >= 1) |
|
81
|
1 |
1 |
if ($$object{'Verbose'} >= 3) |
|
100
|
1 |
2 |
if ($sec =~ /^[0-9]$/msx) |
|
101
|
1 |
2 |
if ($minute =~ /^[0-9]$/msx) |