Branch Coverage

lib/App/MtAws.pm
Criterion Covered Total %
branch 10 80 12.5


line true false branch
69 186 734 if (my($mod) = m[^App/MtAws/(.*)\.pmc?$])
73 1 185 unless defined $got
74 3 183 unless $got eq $VERSION
82 154 51 if (not $module =~ m[^App/MtAws] and $module =~ /\.pmc?/)
87 29 125 unless defined $ver
114 0 0 if $^O eq 'cygwin'
115 0 0 if $VERSION =~ /_/
116 0 0 if defined $ENV{'PERLIO'} and $ENV{'PERLIO'} =~ /stdio/
117 0 0 if $^O eq 'MSWin32'
120 0 0 unless (defined eval { do { process(); 1 } })
139 0 0 if ($res->{'warnings'})
145 0 0 if ($res->{'error_texts'})
151 0 0 if ($action ne 'help' and $action ne 'version')
159 0 0 if ($action eq 'sync') { }
0 0 elsif ($action eq 'upload-file') { }
0 0 elsif ($action eq 'purge-vault') { }
0 0 elsif ($action eq 'restore') { }
0 0 elsif ($action eq 'restore-completed') { }
0 0 elsif ($action eq 'check-local-hash') { }
0 0 elsif ($action eq 'retrieve-inventory') { }
0 0 elsif ($action eq 'download-inventory') { }
0 0 elsif ($action eq 'create-vault') { }
0 0 elsif ($action eq 'delete-vault') { }
0 0 elsif ($action eq 'help') { }
0 0 elsif ($action eq 'version') { }
160 0 0 unless -d &binaryfilename($options->{'dir'})
171 0 0 unless defined(my $relfilename = $options->{'relfilename'})
186 0 0 if defined $j->{'journal_h'}{$relfilename}
189 0 0 if ($options->{'data-type'} ne 'filename')
198 0 0 $options->{'data-type'} eq 'filename' ? :
205 0 0 unless $R
215 0 0 if (scalar keys %$archives) { }
216 0 0 if ($options->{'dry-run'}) { }
225 0 0 if (my $rec = shift @filelist) { }
234 0 0 unless $R
244 0 0 unless $options->{'max-number-of-files'}
268 0 0 if (keys %filelist) { }
269 0 0 if ($options->{'dry-run'}) { }
276 0 0 unless $R
378 0 0 if eof STDIN