blib/lib/App/aki.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 31 | 36 | 86.1 |
line | true | false | branch |
---|---|---|---|
80 | 2 | 19 | if ($$config{'cookie_jar'}) |
86 | 0 | 21 | if ($$config{'raw'}) |
95 | 1 | 20 | if ($$config{'stderr'}) { } |
125 | 1 | 20 | if ($decoded and $$config{'pointer'}) |
130 | 0 | 21 | unless ($decoded) |
141 | 1 | 20 | if (my $decoder = $DECODERS{lc($$config{'decoder'} || '')}) { } |
147 | 33 | 20 | unless $$decoder{'detect'}($res) |
159 | 1 | 20 | if $$config{'verbose'} |
161 | 1 | 20 | unless ($$config{'in_enc'} =~ /^utf\-?8$/i) |
181 | 0 | 21 | if $@ |
198 | 1 | 20 | if ($$config{'verbose'}) |
204 | 21 | 0 | if ($res->is_success) { } |
205 | 1 | 20 | if ($$config{'verbose'}) |
224 | 2 | 19 | if ($$config{'header'} and ref $$config{'header'} eq 'ARRAY') |
230 | 1 | 20 | if ($$config{'referer'}) |
238 | 1 | 20 | if ($$config{'user'}) |
243 | 1 | 20 | if ($$config{'cookie'}) |
289 | 0 | 21 | 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; } |