Branch Coverage

blib/lib/Net/AmazonS3/Simple/HTTP.pm
Criterion Covered Total %
branch 13 20 65.0


line true false branch
41 0 12 unless defined $self->$req
51 5 1 unless defined $options{'method'}
54 2 8 unless defined $options{$req}
65 4 0 if $ENV{'AWS_S3_DEBUG'}
69 4 0 if $ENV{'AWS_S3_DEBUG'}
71 1 3 if ($self->auto_region and $response->code == 400)
74 1 0 if ($response->content =~ m[([-\w]+)])
77 1 0 if $ENV{'AWS_S3_DEBUG'}
84 4 0 if ($response->is_success)
102 4 0 $self->secure ? :