Branch Coverage

blib/lib/SMS/Send/SMSGlobal/HTTP.pm
Criterion Covered Total %
branch 24 34 70.5


line true false branch
193 19 55 if /^__/
195 55 0 if (defined(my $val = $$msg{$_}))
201 1 8 if (ref $http_params{'scheduledatetime'})
208 1 0 if $_->can('ymd')
210 1 0 if &Scalar::Util::blessed($_) and try sub { $_->can('hms') if $_->can('ymd'); }
213 9 0 if (defined $http_params{'to'})
215 1 8 if ref($http_params{'to'} || '') eq 'ARRAY'
224 6 3 if (defined $http_params{'from'})
231 0 9 if ($msg->__verbose)
240 1 8 if (my $transport = $msg->__transport)
242 0 1 if ($transport eq 'http') { }
1 0 elsif ($transport eq 'https') { }
253 0 9 if $msg->__verbose
259 0 9 unless $response
262 0 9 if ($msg->__verbose)
270 8 1 if ($response->is_success) { }
277 8 2 if (/^(OK|SMSGLOBAL DELAY)/)