Branch Coverage

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; } )