line |
true |
false |
branch |
76
|
0 |
1 |
if $e eq '-compile' |
84
|
2 |
22 |
unless defined $sec |
86
|
19 |
3 |
unless ref $opt |
87
|
12 |
10 |
unless $sec |
91
|
12 |
10 |
unless $sec |
107
|
10 |
0 |
@rv ? : |
115
|
10 |
30 |
unless $$e[1] |
116
|
26 |
4 |
$$e[1] > 1 ? : |
127
|
0 |
10 |
$weeks ? : |
128
|
0 |
10 |
$weeks ? : |
129
|
0 |
10 |
$weeks ? : |
135
|
0 |
40 |
if ($add) |
141
|
0 |
40 |
if ($$r[1] >= $default and $$r[0] ne 'year') |
144
|
0 |
0 |
if ($i == 0) |
161
|
0 |
40 |
$weeks ? : |
162
|
0 |
40 |
$weeks ? : |
164
|
30 |
10 |
$xmid ? : |
166
|
30 |
10 |
if ($xmid) |
180
|
0 |
0 |
$sec >= 60 ? : |
|
0 |
0 |
$sec >= 3600 ? : |
|
10 |
0 |
$sec >= 86400 ? : |
|
0 |
10 |
$sec >= 604800 && $weeks ? : |
|
0 |
10 |
$sec >= 2592000 ? : |
|
0 |
10 |
$sec >= 31536000 ? : |
193
|
3 |
19 |
unless (exists $$LCACHE{$lang}) |
194
|
0 |
3 |
if ($lang =~ /[^a-z_A-Z_0-9]/msx or $lang =~ / \A [0-9] /msx) |
223
|
0 |
0 |
unless -d $test |
225
|
0 |
0 |
unless opendir $LDIR, $test |
228
|
0 |
0 |
if -d $file |
229
|
0 |
0 |
if ($file =~ / \A (.+?) \. pm \z /msx) |