Branch Coverage

blib/lib/Device/Gsm/Sms/Token/OA.pm

Criterion	Covered	Total	%
branch	1	2	50.0

line	true	false	branch
70	0	1	if (not $str =~ /^\s*\+/ and $self->get('type') eq '91')