line |
true |
false |
branch |
64
|
0 |
6 |
$^O eq 'MSWin32' ? : |
168
|
82 |
0 |
if (ref $what) { } |
170
|
82 |
0 |
if (defined $old) { } |
171
|
0 |
82 |
unless defined $new |
173
|
82 |
0 |
if (UNIVERSAL::can('Data::Dumper', 'init_refaddr_format')) |
180
|
82 |
63 |
ref $old->[$_] && defined $new->[$_] ? : |
185
|
0 |
82 |
if $@ |
201
|
0 |
0 |
if $ar->[$n] eq $i |
207
|
129 |
175 |
$_[0] =~ m[^\s*[[:alnum:]]+://] ? : |
211
|
2 |
153 |
$uri->path =~ m[(/|^)\.\.($|/)] ? : |
220
|
0 |
0 |
unless (_is_absolute($filename) or _is_updir($filename)) |
223
|
0 |
0 |
if -d $f |
236
|
43 |
33 |
unless (_is_absolute($filename) or _is_updir($filename)) |
239
|
22 |
21 |
if (-f $f) |
240
|
22 |
0 |
unless $all |
245
|
12 |
42 |
$all || ref $opts && $opts->{'strict'} ? : |
252
|
6 |
43 |
unless defined $Treex::PML::resourcePath |
253
|
43 |
0 |
wantarray ? : |
258
|
0 |
7 |
if (defined $Treex::PML::resourcePath and length $Treex::PML::resourcePath) |
265
|
0 |
0 |
$Treex::PML::resourcePath ne '' ? : |
271
|
0 |
0 |
unless defined $Treex::PML::resourcePath |
282
|
112 |
0 |
&blessed($url) && $url->isa('URI') && ($url->scheme || 'file') eq 'file' || $url =~ m[^file:/] ? : |
286
|
0 |
0 |
if (_is_local($url)) { } |
299
|
0 |
116 |
if $Treex::PML::Debug |
302
|
4 |
112 |
if (_is_absolute($rel_uri)) { } |
|
2 |
110 |
elsif (_is_updir($rel_uri)) { } |
305
|
2 |
0 |
_is_url($base) ? : |
309
|
110 |
0 |
if (_is_local($base_uri)) |
310
|
86 |
24 |
if (-f $abs_f) { } |
|
0 |
24 |
elsif (not _is_url($base)) { } |
311
|
0 |
86 |
if $Treex::PML::Debug |
312
|
81 |
5 |
_is_url($base) ? : |
314
|
0 |
0 |
if $Treex::PML::Debug |
315
|
0 |
0 |
if -f $rel_f |
318
|
22 |
2 |
if ($use_resources) |
320
|
22 |
0 |
if ($res) |
321
|
0 |
22 |
if $Treex::PML::Debug |
325
|
0 |
2 |
if $Treex::PML::Debug |
330
|
2 |
0 |
_is_local($base) ? : |
337
|
0 |
14 |
if $Treex::PML::Debug |
342
|
14 |
0 |
if (eval {
do {
require $file
}
} or $INC{$file}) |
347
|
14 |
0 |
if ($b) { } |
350
|
0 |
0 |
if $@ |
359
|
8 |
0 |
@_ == @Treex::PML::BACKENDS ? : |
|
0 |
8 |
wantarray ? : |
373
|
0 |
0 |
@new == @imported ? : |
|
0 |
0 |
wantarray ? : |
379
|
11 |
38 |
$backend =~ /:/ ? : |
|
0 |
49 |
$backend =~ /^([^:]+)Backend$/ ? : |
|
11 |
38 |
$backend =~ /^Treex::PML::Backend::/ ? : |
|
11 |
38 |
$backend =~ /:/ ? : |
390
|
24 |
0 |
if (UNIVERSAL::can($try, 'open_backend')) |
395
|
24 |
0 |
if $b and UNIVERSAL::can($b, 'test') and UNIVERSAL::can($b, 'read') |
403
|
11 |
0 |
if (UNIVERSAL::can($try, 'open_backend')) |
408
|
11 |
0 |
if $b and UNIVERSAL::can($b, 'write') |