| line |
true |
false |
branch |
|
21
|
0 |
1 |
unless $^O eq "linux" |
|
27
|
0 |
1 |
if defined $after |
|
28
|
1 |
0 |
if defined $every |
|
29
|
0 |
1 |
if $mode_count > 1 |
|
34
|
0 |
1 |
if (defined $opt{'timerfd'}) { } |
|
37
|
0 |
0 |
unless builtin::blessed($tfd) |
|
43
|
0 |
0 |
unless $tfd->can($m) |
|
50
|
0 |
1 |
exists $opt{'nonblocking'} ? : |
|
51
|
0 |
1 |
exists $opt{'cloexec'} ? : |
|
52
|
0 |
1 |
exists $opt{'clock'} ? : |
|
55
|
1 |
0 |
if $nonblocking |
|
59
|
0 |
1 |
unless my $tfd = "Linux::FD::Timer"->new($clock, @flags) |
|
64
|
1 |
0 |
if ($cloexec) |
|
66
|
1 |
0 |
if (defined $fd) |
|
73
|
0 |
1 |
if (keys %opt) |
|
78
|
0 |
1 |
if defined $after |
|
79
|
1 |
0 |
if defined $every |
|
94
|
2 |
0 |
defined $n ? : |
|
108
|
0 |
0 |
if $seconds < 0 |
|
115
|
0 |
1 |
unless $interval > 0 |
|
127
|
0 |
1 |
unless defined $v |
|
128
|
0 |
1 |
if ref $v or not $v =~ /\A-?(?:\d+(?:\.\d*)?|\.\d+)\z/u |