blib/lib/CSS/DOM/Rule/Import.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 8 | 13 | 61.5 |
line | l | !l | condition |
---|---|---|---|
93 | 9 | 0 | eval { do { CSS::DOM::Parser::parse($css, @args) } } || 0 |
9 | 0 | $self->[4] = eval { do { CSS::DOM::Parser::parse($css, @args) } } || 0 or return |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
47 | 0 | 27 | 7 | $self->[2] ||= do { require CSS::DOM::Parser; if ($self->[5][0] eq 'u') { my $url = $self->[5][1]; $url =~ s/^url\([ \t\r\n\f]*//; $url =~ s/[ \t\r\n\f]*\)\z//; chop $url if $url =~ s/^['"]//; &CSS::DOM::Parser::unescape($url); } else { &CSS::DOM::Parser::unescape(substr($self->[5][1], 1, -1)); } } |
73 | 5 | 6 | 0 | $_[0][3] ||= (require CSS::DOM::MediaList, 'CSS::DOM::MediaList'->new) |
104 | 1 | 0 | 1 | $self->[4] || () |