blib/lib/App/aki.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 26 | 36 | 72.2 |
line | true | false | branch |
---|---|---|---|
80 | 0 | 15 | if ($config->{'cookie_jar'}) |
86 | 0 | 15 | if ($config->{'raw'}) |
95 | 1 | 14 | if ($config->{'stderr'}) { } |
125 | 1 | 14 | if ($decoded and $config->{'pointer'}) |
130 | 0 | 15 | unless ($decoded) |
141 | 1 | 14 | if (my $decoder = $DECODERS{lc($config->{'decoder'} || '')}) { } |
147 | 25 | 14 | unless $decoder->{'detect'}->($res) |
159 | 1 | 14 | if $config->{'verbose'} |
161 | 1 | 14 | unless ($config->{'in_enc'} =~ /^utf\-?8$/i) |
181 | 0 | 15 | if $@ |
198 | 1 | 14 | if ($config->{'verbose'}) |
204 | 15 | 0 | if ($res->is_success) { } |
205 | 1 | 14 | if ($config->{'verbose'}) |
224 | 0 | 15 | if ($config->{'header'} and ref $config->{'header'} eq 'ARRAY') |
230 | 0 | 15 | if ($config->{'referer'}) |
238 | 0 | 15 | if ($config->{'user'}) |
243 | 0 | 15 | if ($config->{'cookie'}) |
289 | 0 | 15 | unless &GetOptionsFromArray(\@argv, 'd|decoder=s', \$config->{'decoder'}, 'm|method=s', \$config->{'method'}, 'timeout=i', \$config->{'timeout'}, 'H|header=s@', \$config->{'header'}, 'e|referer=s', \$config->{'referer'}, 'b|cookie=s', \$config->{'cookie'}, 'c|cookie-jar=s', \$config->{'cookie_jar'}, 'u|user=s', \$config->{'user'}, 'p|pointer=s', \$config->{'pointer'}, 'ie|in-enc=s', \$config->{'in_enc'}, 'oe|out-enc=s', \$config->{'out_enc'}, 'agent=s', \$config->{'agent'}, 'color', \$config->{'color'}, 'print_escapes', \$config->{'print_escapes'}, 'stderr', \$config->{'stderr'}, 'indent=i', \$config->{'indent'}, 'raw', \$config->{'raw'}, 'verbose', \$config->{'verbose'}, 'rc=s', \$config->{'rc'}, 'h|help', sub { _show_usage(1); } , 'v|version', sub { print "aki $VERSION\n"; exit 1; } ) |