| line |
true |
false |
branch |
|
47
|
0 |
0 |
unless @_ > 1 |
|
54
|
0 |
0 |
unless defined $wanted_filter and length $wanted_filter |
|
55
|
0 |
0 |
unless $pkg->can($wanted_filter) |
|
57
|
0 |
0 |
if not defined $format or $format ne 'array' |
|
96
|
0 |
0 |
if $@ |
|
165
|
0 |
0 |
if ($headers) |
|
166
|
0 |
0 |
if /<[Hh][Tt][Mm][Ll]/o |
|
167
|
0 |
0 |
if ($headers) |
|
174
|
0 |
0 |
if (m[]o) |
|
179
|
0 |
0 |
if ($pre) |
|
185
|
0 |
0 |
unless length $_ |
|
188
|
0 |
0 |
if /<[Ss][Cc][Rr][Ii][Pp][Tt]/o |
|
189
|
0 |
0 |
if m[]o |
|
190
|
0 |
0 |
if ($script) |
|
191
|
0 |
0 |
if m[^//]o and not /-->/o |
|
192
|
0 |
0 |
unless length $_ |
|
193
|
0 |
0 |
unless length $_ |
|
197
|
0 |
0 |
if /<[Ss][Tt][Yy][Ll][Ee]/o |
|
198
|
0 |
0 |
if m[]o |
|
199
|
0 |
0 |
if ($style) |
|
200
|
0 |
0 |
unless length $_ |
|
204
|
0 |
0 |
unless $style or $script |
|
216
|
0 |
0 |
unless length $_ |
|
219
|
0 |
0 |
if /<[Pr][Rr][Ee]>/o |
|
272
|
0 |
0 |
unless $$options{'loop_context_vars'} |
|
276
|
0 |
0 |
if ($chunk =~ m[^<
(?:!--\s*)?
(?:
[Tt][Mm][Pp][Ll]_[Jj][Oo][Ii][Nn]
)
\s+
# ESCAPE attribute
(?:
[Ee][Ss][Cc][Aa][Pp][Ee]
\s*=\s*
(
(?:"[^"]*")
|
(?:'[^']*')
|
(?:[^\s]*)
) # $1 => ESCAPE
)?
\s*
# FIELD attribute
(?:
[Ff][Ii][Ee][Ll][Dd]
\s*=\s*
(
(?:"[^"]*")
|
(?:'[^']*')
|
(?:[^\s]*)
) # $2 => FIELD
)?
\s*
# SEP attribute
(?:
[Ss][Ee][Pp](?:[Aa][Rr][Aa][Tt][Oo][Rr])?
\s*=\s*
(
(?:"[^"]*")
|
(?:'[^']*')
|
(?:[^\s]*)
) # $3 => SEP
)?
\s*
# ESCAPE attribute
(?:
[Ee][Ss][Cc][Aa][Pp][Ee]
\s*=\s*
(
(?:"[^"]*")
|
(?:'[^']*')
|
(?:[^\s]*)
) # $4 => ESCAPE
)?
\s*
# FIELD attribute
(?:
[Ff][Ii][Ee][Ll][Dd]
\s*=\s*
(
(?:"[^"]*")
|
(?:'[^']*')
|
(?:[^\s]*)
) # $5 => FIELD
)?
\s*
# SEP attribute
(?:
[Ss][Ee][Pp](?:[Aa][Rr][Aa][Tt][Oo][Rr])?
\s*=\s*
(
(?:"[^"]*")
|
(?:'[^']*')
|
(?:[^\s]*)
) # $6 => SEP
)?
\s*
# ESCAPE attribute
(?:
[Ee][Ss][Cc][Aa][Pp][Ee]
\s*=\s*
(
(?:"[^"]*")
|
(?:'[^']*')
|
(?:[^\s]*)
) # $7 => ESCAPE
)?
\s*
# NAME attribute
(?:
(?:
[Nn][Aa][Mm][Ee]
\s*=\s*
)?
(
(?:"[^"]*")
|
(?:'[^']*')
|
(?:[^\s]*)
) # $8 => NAME
)?
\s*
# ESCAPE attribute
(?:
[Ee][Ss][Cc][Aa][Pp][Ee]
\s*=\s*
(
(?:"[^"]*")
|
(?:'[^']*')
|
(?:[^\s]*)
) # $9 => ESCAPE
)?
\s*
# FIELD attribute
(?:
[Ff][Ii][Ee][Ll][Dd]
\s*=\s*
(
(?:"[^"]*")
|
(?:'[^']*')
|
(?:[^\s]*)
) # $10 => FIELD
)?
\s*
# SEP attribute
(?:
[Ss][Ee][Pp](?:[Aa][Rr][Aa][Tt][Oo][Rr])?
\s*=\s*
(
(?:"[^"]*")
|
(?:'[^']*')
|
(?:[^\s]*)
) # $11 => SEP
)?
\s*
# ESCAPE attribute
(?:
[Ee][Ss][Cc][Aa][Pp][Ee]
\s*=\s*
(
(?:"[^"]*")
|
(?:'[^']*')
|
(?:[^\s]*)
) # $12 => ESCAPE
)?
\s*
# FIELD attribute
(?:
[Ff][Ii][Ee][Ll][Dd]
\s*=\s*
(
(?:"[^"]*")
|
(?:'[^']*')
|
(?:[^\s]*)
) # $13 => FIELD
)?
\s*
# SEP attribute
(?:
[Ss][Ee][Pp](?:[Aa][Rr][Aa][Tt][Oo][Rr])?
\s*=\s*
(
(?:"[^"]*")
|
(?:'[^']*')
|
(?:[^\s]*)
) # $14 => SEP
)?
\s*
# ESCAPE attribute
(?:
[Ee][Ss][Cc][Aa][Pp][Ee]
\s*=\s*
(
(?:"[^"]*")
|
(?:'[^']*')
|
(?:[^\s]*)
) # $15 => ESCAPE
)?
\s*
(?:
(?:--)
|
(?:/)
)?>
(.*) # $16 => $post - text that comes after the tag
$]osx) |
|
520
|
0 |
0 |
if (defined $name and length $name) |
|
521
|
0 |
0 |
defined $15 ? : |
|
|
0 |
0 |
defined $12 ? : |
|
|
0 |
0 |
defined $9 ? : |
|
|
0 |
0 |
defined $7 ? : |
|
|
0 |
0 |
defined $4 ? : |
|
|
0 |
0 |
defined $1 ? : |
|
522
|
0 |
0 |
defined $14 ? : |
|
|
0 |
0 |
defined $11 ? : |
|
|
0 |
0 |
defined $6 ? : |
|
|
0 |
0 |
defined $3 ? : |
|
523
|
0 |
0 |
defined $13 ? : |
|
|
0 |
0 |
defined $10 ? : |
|
|
0 |
0 |
defined $5 ? : |
|
|
0 |
0 |
defined $2 ? : |
|
524
|
0 |
0 |
defined $16 ? : |
|
525
|
0 |
0 |
unless length $field |
|
526
|
0 |
0 |
if $sep =~ /^['"]/ |
|
527
|
0 |
0 |
if $escape |
|
528
|
0 |
0 |
length $sep ? : |
|
548
|
0 |
0 |
unless @taglist > 0 |
|
554
|
0 |
0 |
defined $2 ? : |
|
|
0 |
0 |
defined $1 ? : |
|
556
|
0 |
0 |
defined $2 ? : |
|
|
0 |
0 |
defined $1 ? : |
|
562
|
0 |
0 |
unless @chunks > 0 |
|
578
|
0 |
0 |
if ($chunk =~ /$chunker/) |
|
579
|
0 |
0 |
defined $3 ? : |
|
|
0 |
0 |
defined $2 ? : |
|
|
0 |
0 |
defined $1 ? : |
|
580
|
0 |
0 |
if (defined $name and exists $set_params{$name}) |
|
582
|
0 |
0 |
if $4 |