| line |
true |
false |
branch |
|
38
|
0 |
0 |
unless my $url = shift @args |
|
42
|
0 |
0 |
/^\s*([^:]+)\s*:\s*(.*+)$/ ? : |
|
45
|
0 |
0 |
!($url =~ m[^/]) ? : |
|
46
|
0 |
0 |
if $redirect |
|
57
|
0 |
0 |
if $verbose |
|
62
|
0 |
0 |
if $redirect and $tx->res->is_redirect |
|
63
|
0 |
0 |
defined $selector ? : |
|
70
|
0 |
0 |
if $method eq 'HEAD' |
|
76
|
0 |
0 |
unless defined $selector |
|
77
|
0 |
0 |
if not length $selector or $selector =~ m[^/] |
|
88
|
0 |
0 |
unless my $data = j(shift()) |
|
89
|
0 |
0 |
unless defined($data = 'Mojo::JSON::Pointer'->new($data)->get(shift())) |
|
90
|
0 |
0 |
unless ref $data eq 'HASH' or ref $data eq 'ARRAY' |
|
100
|
0 |
0 |
if $charset |
|
107
|
0 |
0 |
if $command =~ /^\d+$/ |
|
110
|
0 |
0 |
if $command eq 'text' |
|
113
|
0 |
0 |
if $command eq 'all' |
|
116
|
0 |
0 |
if $command eq 'attr' |