| 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] || () |