| blib/lib/FirstGoodURL.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 3 | 12 | 25.0 |
| line | l | !l | condition |
|---|---|---|---|
| 38 | 0 | 1 | $match = $_ and last |
| 42 | 0 | 0 | $match = $_ and last |
| 45 | 0 | 0 | $match = $_ and last |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 41 | 5 | 0 | 0 | keys %$ctype == 1 and my($regex) = (each %$ctype)[1] |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 14 | 0 | 1 | 0 | $ua ||= 'LWP::UserAgent'->new |