line |
true |
false |
branch |
74
|
0 |
1 |
if $e eq '-compile' |
82
|
2 |
34 |
unless defined $sec |
84
|
31 |
3 |
unless ref $opt |
85
|
20 |
14 |
unless $sec |
89
|
20 |
14 |
unless $sec |
105
|
14 |
0 |
@rv ? : |
113
|
14 |
42 |
unless $e->[1] |
114
|
36 |
6 |
$e->[1] > 1 ? : |
125
|
0 |
14 |
$weeks ? : |
126
|
0 |
14 |
$weeks ? : |
127
|
0 |
14 |
$weeks ? : |
133
|
0 |
56 |
if ($add) |
139
|
0 |
56 |
if ($r->[1] >= $default and $r->[0] ne 'year') |
142
|
0 |
0 |
if ($i == 0) |
159
|
0 |
56 |
$weeks ? : |
160
|
0 |
56 |
$weeks ? : |
162
|
42 |
14 |
$xmid ? : |
164
|
42 |
14 |
if ($xmid) |
178
|
0 |
0 |
$sec >= 60 ? : |
|
0 |
0 |
$sec >= 3600 ? : |
|
14 |
0 |
$sec >= 86400 ? : |
|
0 |
14 |
$sec >= 604800 && $weeks ? : |
|
0 |
14 |
$sec >= 2592000 ? : |
|
0 |
14 |
$sec >= 31536000 ? : |
191
|
5 |
29 |
unless (exists $LCACHE->{$lang}) |
192
|
0 |
5 |
if ($lang =~ /[^a-z_A-Z_0-9]/msx or $lang =~ / \A [0-9] /msx) |
221
|
0 |
0 |
unless -d $test |
223
|
0 |
0 |
unless opendir $LDIR, $test |
226
|
0 |
0 |
if -d $file |
227
|
0 |
0 |
if ($file =~ / \A (.+?) \. pm \z /msx) |