Branch Coverage

blib/lib/SMS/Send.pm
Criterion Covered Total %
branch 33 42 78.5


line true false branch
88 1 0 unless (@DRIVERS)
144 0 9 &Params::Util::_HASH0($_[0]) ? :
148 2 4 unless (&Params::Util::_INSTANCE($object, 'SMS::Send::Driver'))
154 0 4 unless (&Params::Util::_INSTANCE($self, $class))
236 6 6 unless (_STRING($text))
242 3 3 unless (_STRING($to))
248 2 1 unless (_STRING($to))
251 0 1 unless ($to =~ /^\+?\d+$/)
256 0 1 if ($to =~ /^\+0/)
259 0 1 if ($to =~ /^\+/ and length $to <= 7)
262 1 0 unless (ref($self->_OBJECT_) =~ /^SMS::Send::\w+::/)
264 0 1 unless ($to =~ /^\+/)
277 0 1 unless (defined $rv)
300 4 19 unless (defined $name and not ref $name and length $name)
303 1 18 if ($name =~ /^\d+$/)
311 4 14 unless (&Params::Util::_CLASS($driver))
317 2 12 if ($@ and $@ =~ /^Can't locate /) { }
1 11 elsif ($@) { }
327 2 9 unless ($driver->isa('SMS::Send::Driver') and $driver ne 'SMS::Send::Driver')
336 1 9 ref $_[0] ? :
342 1 3 if (_STRING($key) and $key =~ /^_/)