| line |
true |
false |
branch |
|
92
|
0 |
0 |
if (defined $LOGINDETAILS) { } |
|
|
0 |
0 |
elsif (-t STDIN) { } |
|
100
|
0 |
0 |
unless length $user |
|
128
|
0 |
68 |
if ($param{'remove_jscript'}) { } |
|
133
|
64 |
4 |
if ($param{'Debug'}) |
|
139
|
0 |
68 |
if ($param{'LoginDetails'}) |
|
144
|
67 |
1 |
if ($param{'IncludeType'}) { } |
|
145
|
0 |
46 |
if $param{'IncludeType'} ne 'extern' and $param{'IncludeType'} ne 'cid' and $param{'IncludeType'} ne 'location' |
|
155
|
0 |
68 |
if (defined $param{'ExternImages'}) |
|
160
|
0 |
68 |
if ($param{'TextCharset'}) { } |
|
164
|
0 |
68 |
if ($param{'HTMLCharset'}) { } |
|
168
|
0 |
68 |
if ($param{'TextEncoding'}) { } |
|
172
|
0 |
68 |
if ($param{'HTMLEncoding'}) { } |
|
182
|
0 |
68 |
if ($param{'Proxy'}) |
|
184
|
0 |
0 |
if $$self{'_DEBUG'} |
|
190
|
0 |
68 |
if ($param{'HashTemplate'}) |
|
192
|
0 |
0 |
ref $param{'HashTemplate'} eq 'HASH' ? : |
|
202
|
0 |
68 |
if ($param{'Url'}) |
|
207
|
0 |
68 |
if ($url) |
|
221
|
1647 |
9 |
$rep ? : |
|
237
|
0 |
558 |
if $sep ne '"' and $sep ne q['] |
|
250
|
63 |
0 |
if ($url_page and $url_page =~ m[^(https?|ftp|file|nntp)://]) { } |
|
252
|
63 |
0 |
if $$self{'_DEBUG'} |
|
255
|
0 |
63 |
if (not $res->is_success) { } |
|
263
|
42 |
21 |
if ($url_txt) |
|
265
|
21 |
21 |
if ($url_txt =~ m[^(https?|ftp|file|nntp)://]) { } |
|
267
|
21 |
0 |
if $$self{'_DEBUG'} |
|
270
|
0 |
21 |
if (not $res3->is_success) { } |
|
276
|
0 |
63 |
unless $gabarit |
|
304
|
513 |
1071 |
if ($$url[0] eq 'a' and $$url[1] eq 'href' and $$url[2] and not $$url[2] =~ m[^http://] || $$url[2] =~ /^mailto:/ || $$url[2] =~ /^\#/ and not $url_remplace{$urlAbs}) { } |
|
|
0 |
1071 |
elsif (lc($$url[0] eq 'iframe') || lc($$url[0] eq 'frame') and lc $$url[1] eq 'src' and $$url[2]) { } |
|
|
18 |
1053 |
elsif (lc $$url[1] eq 'background' and $$url[2]) { } |
|
|
0 |
1053 |
elsif (lc $$url[0] eq 'embed' and $$url[4]) { } |
|
|
0 |
1053 |
elsif (lc $$url[0] eq 'param' and lc $$url[2] eq 'movie' and $$url[4]) { } |
|
|
36 |
1671 |
elsif ($$self{'_include'} ne 'extern' and not $self->_matches_extern_images($urlAbs) and lc $$url[0] eq 'img' || lc $$url[0] eq 'src' and not $images_read{$urlAbs}) { } |
|
312
|
513 |
0 |
if $$self{'_DEBUG'} |
|
323
|
0 |
0 |
if $$self{'_DEBUG'} |
|
331
|
6 |
12 |
$$self{'_include'} eq 'cid' ? : |
|
337
|
6 |
6 |
if ($$self{'_include'} ne 'extern' and not $images_read{$urlAbs} and not $self->_matches_extern_images($urlAbs)) |
|
351
|
0 |
0 |
$$self{'_include'} eq 'cid' ? : |
|
356
|
0 |
0 |
if ($$self{'_include'} ne 'extern' and not $images_read{$urlAbs} and not $self->_matches_extern_images($urlAbs)) |
|
373
|
0 |
0 |
$$self{'_include'} eq 'cid' ? : |
|
378
|
0 |
0 |
if ($$self{'_include'} ne 'extern' and not $images_read{$urlAbs} and not $self->_matches_extern_images($urlAbs)) |
|
399
|
21 |
42 |
if ($$self{'_include'} eq 'cid') { } |
|
408
|
0 |
63 |
if (scalar keys %{$$self{'_HASH_TEMPLATE'};} != 0) |
|
410
|
0 |
0 |
if $gabarit |
|
443
|
0 |
0 |
if ($image =~ /$regexp/) |
|
458
|
63 |
0 |
if ($html) |
|
459
|
48 |
15 |
$txt || @$ref_mail ? : |
|
470
|
15 |
48 |
unless $txt or @$ref_mail |
|
474
|
42 |
21 |
if ($txt) |
|
475
|
42 |
0 |
$html ? : |
|
487
|
0 |
42 |
unless $html |
|
491
|
6 |
57 |
if (@$ref_mail and not $txt) { } |
|
|
30 |
27 |
elsif ($txt and not @$ref_mail) { } |
|
|
12 |
30 |
elsif ($txt and @$ref_mail) { } |
|
540
|
54 |
0 |
unless ($milieu =~ /stylesheet/i or $fin =~ /stylesheet/i) |
|
544
|
0 |
54 |
if ($fin =~ /shortcut/i or $milieu =~ /shortcut/i) |
|
548
|
54 |
0 |
if $$self{'_DEBUG'} |
|
550
|
54 |
0 |
if $$self{'_DEBUG'} |
|
562
|
63 |
0 |
if $$self{'_DEBUG'} |
|
573
|
36 |
0 |
if $$self{'_DEBUG'} |
|
576
|
36 |
0 |
if $$self{'_DEBUG'} |
|
577
|
0 |
36 |
$$self{'_remove_jscript'} ? : |
|
587
|
0 |
63 |
if ($$self{'_remove_jscript'}) |
|
590
|
63 |
0 |
if $$self{'_DEBUG'} |
|
601
|
0 |
0 |
if ($$self{'_include'} ne 'extern') |
|
603
|
0 |
0 |
if ($$self{'_include'} eq 'cid') { } |
|
613
|
63 |
0 |
if $$self{'_DEBUG'} |
|
625
|
0 |
46 |
if ($typ) { } |
|
|
40 |
6 |
elsif (lc($ur) =~ /\.gif$/i) { } |
|
|
0 |
6 |
elsif (lc($ur) =~ /\.jpg$/i) { } |
|
|
0 |
6 |
elsif (lc($ur) =~ /\.png$/i) { } |
|
632
|
0 |
46 |
if ($$self{'_HASH_TEMPLATE'}{$ur}) { } |
|
633
|
0 |
0 |
if $$self{'_DEBUG'} |
|
635
|
0 |
0 |
ref $$self{'_HASH_TEMPLATE'}{$ur} eq 'ARRAY' ? : |
|
639
|
42 |
4 |
if $$self{'_DEBUG'} |
|
642
|
30 |
16 |
unless ($res2->is_success) |
|
651
|
23 |
23 |
if ($$self{'_include'} eq 'cid') { } |
|
695
|
63 |
0 |
if $$self{'_DEBUG'} |
|
704
|
0 |
1 |
unless $masque |
|
708
|
2 |
0 |
if ($v) { } |
|
720
|
30 |
0 |
if $$self{'_DEBUG'} |
|
722
|
24 |
6 |
if ($$self{'_ERRORS'}) |
|
735
|
0 |
0 |
if $$self{'_ERRORS'} |