blib/lib/Squatting.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 1 | 22 | 4.5 |
line | true | false | branch |
---|---|---|---|
30 | 0 | 3 | if ($m ne 'Squatting') |
40 | 0 | 0 | if (@args and ref $args[-1] eq 'HASH') |
44 | 0 | 0 | unless $c |
47 | 0 | 0 | unless $path |
51 | 0 | 0 | if ($input) |
56 | 0 | 0 | ref $$input{$_} eq 'ARRAY' ? : |
70 | 0 | 0 | if (@regex_captures = $url =~ qr/^$_$/) |
71 | 0 | 0 | if $#+ == 0 |
142 | 0 | 0 | if ref($@) =~ /^HTTP::Exception/ |
143 | 0 | 0 | if $@ |
148 | 0 | 0 | if %$cookies |