| line |
true |
false |
branch |
|
13
|
0 |
3 |
if ($Amazon::API::Botocore::EVAL_ERROR) { }
|
|
100
|
0 |
0 |
if not $service and ref($service) =~ /^Amazon::API::/msx
|
|
103
|
0 |
0 |
unless $api
|
|
108
|
0 |
0 |
if ($service_name =~ /^Amazon::API::([^:]+)$/msx) { }
|
|
119
|
0 |
0 |
if not $ret or $Amazon::API::Botocore::EVAL_ERROR
|
|
140
|
0 |
0 |
unless $rsp->{$more_results}
|
|
146
|
0 |
0 |
$limit ? :
|
|
166
|
0 |
0 |
if ($path_parts[$idx] and $path_parts[$idx] =~ /^[{](.*)[}]$/msx)
|
|
174
|
0 |
0 |
if ($query_string)
|
|
188
|
0 |
0 |
unless open my $fh, "<", $path
|
|
196
|
0 |
0 |
unless close $fh
|
|
220
|
0 |
0 |
if ($shape_path and not $shape_path =~ m[/\z]msx)
|
|
225
|
0 |
0 |
unless (-d $shape_path)
|
|
226
|
0 |
0 |
unless make_path($shape_path)
|
|
242
|
0 |
0 |
if ($shape_path) { }
|
|
245
|
0 |
0 |
unless open my $fh, ">", $module
|
|
272
|
0 |
0 |
unless $dir =~ qr/botocore\N{U+2F}botocore/msx
|
|
273
|
0 |
0 |
unless $file =~ qr/service\N{U+2D}2\N{U+2E}json/msx
|
|
280
|
0 |
0 |
if ($boto_path < 0)
|
|
291
|
0 |
0 |
if ($date gt $BOTO_SERVICES{$service}{'date'})
|
|
317
|
0 |
0 |
if ($parameters->{'paginators'})
|
|
342
|
0 |
0 |
if ($options{'pod'})
|
|
364
|
0 |
0 |
if ($options{'pod'})
|
|
371
|
0 |
0 |
if ($input)
|
|
422
|
0 |
0 |
if ($output)
|
|
458
|
0 |
0 |
if (@{$errors;}) { }
|
|
466
|
0 |
0 |
if ($shape->{'error'})
|
|
529
|
0 |
0 |
if ($http)
|
|
646
|
0 |
0 |
if ($options{'output-path'})
|
|
652
|
0 |
0 |
if ($options{'output-path'} ne $Amazon::API::Botocore::DASH)
|
|
653
|
0 |
0 |
unless open $fh, ">", $method_pod_file
|
|
672
|
0 |
0 |
unless ($options{'pod'})
|
|
692
|
0 |
0 |
unless (@services)
|
|
699
|
0 |
0 |
unless $BOTO_SERVICES{$s}
|
|
705
|
0 |
0 |
if ($boto_path < 0)
|
|
719
|
0 |
0 |
if ($service_description->{'operations'})
|
|
756
|
0 |
0 |
unless (-d "$path/botocore")
|
|
772
|
0 |
0 |
unless (keys %BOTO_SERVICES)
|
|
796
|
0 |
0 |
unless $service
|
|
799
|
0 |
0 |
$service eq 'all' ? :
|
|
821
|
0 |
0 |
unless $service
|
|
833
|
0 |
0 |
if ($parameters->{'protocol'} eq "rest-json")
|
|
841
|
0 |
0 |
if ($parameters->{'protocol'} eq "query")
|
|
845
|
0 |
0 |
if ($parameters->{'protocol'} eq "json")
|
|
852
|
0 |
0 |
if ($parameters->{'protocol'} eq "rest-json")
|
|
880
|
0 |
0 |
if ($options{'tidy'} and eval {
|
|
884
|
0 |
0 |
if (Perl::Tidy::perltidy("argv", [], "source", \$module, "destination", \$tidy_module))
|
|
899
|
0 |
0 |
if (not $file and $options{'output-path'})
|
|
902
|
0 |
0 |
unless (-d $path)
|
|
903
|
0 |
0 |
unless make_path($path)
|
|
909
|
0 |
0 |
if (-e $file)
|
|
915
|
0 |
0 |
if ($file) { }
|
|
916
|
0 |
0 |
unless open my $handle, ">", $file
|
|
928
|
0 |
0 |
unless close $fh
|
|
944
|
0 |
0 |
$args{'indent'} ? :
|
|
951
|
0 |
0 |
unless ($width)
|
|
960
|
0 |
0 |
unless ($column_width)
|
|
990
|
0 |
0 |
if ($options{'pager'})
|
|
999
|
0 |
0 |
unless @args or $options{'service'}
|
|
1005
|
0 |
0 |
if (@args == 2) { }
|
|
|
0 |
0 |
elsif (@args == 1 and $service) { }
|
|
1016
|
0 |
0 |
if ($options{'service'} eq 'all') { }
|
|
1068
|
0 |
0 |
unless $service
|
|
1082
|
0 |
0 |
if $file
|
|
1085
|
0 |
0 |
unless ($file and -e $file)
|
|
1093
|
0 |
0 |
unless $file and -e $file
|
|
1114
|
0 |
0 |
if ($ENV{'DEBUG'})
|
|
1134
|
0 |
0 |
if ($options{'help'} or not $options{'command'})
|
|
1138
|
0 |
0 |
if (not $options{'module-name'} and $options{'service'})
|
|
1142
|
0 |
0 |
if ($options{'output-path'} eq $Amazon::API::Botocore::DASH)
|
|
1146
|
0 |
0 |
if ($options{'command'} ne "help")
|
|
1147
|
0 |
0 |
if ($options{'output-path'} and $options{'output-path'} =~ /^[.]/msx) { }
|
|
|
0 |
0 |
elsif ($options{'output-path'} and $options{'module-name'}) { }
|
|
1156
|
0 |
0 |
unless (-d $module_path)
|
|
1157
|
0 |
0 |
unless make_path($module_path)
|
|
1175
|
0 |
0 |
unless $handlers{$options{'command'}}
|