line |
true |
false |
branch |
164
|
0 |
0 |
unless ($$self{'mech'}->success) |
175
|
0 |
0 |
if $$self{'logged_in'} |
191
|
0 |
0 |
if ($$self{'mech'}->content =~ /$RE_BADLOGIN/) |
212
|
0 |
0 |
unless ($$self{'mech'}->content =~ /Compose a message/) |
217
|
0 |
0 |
unless my $form = $$self{'mech'}->form_name('sendMessageForm') |
237
|
0 |
0 |
unless ($$self{'mech'}->success) |
253
|
0 |
2 |
ref $_[0] ? : |
255
|
0 |
1 |
unless (defined $number and not ref $number and length $number) |
259
|
0 |
1 |
unless ($number =~ /^04\d{8}$/) |
266
|
0 |
1 |
ref $_[0] ? : |
268
|
0 |
1 |
unless (defined $password and not ref $password and length $password) |
271
|
0 |
1 |
unless (length $password >= 5) |
278
|
0 |
0 |
ref $_[0] ? : |
280
|
0 |
0 |
unless (length $message <= 160) |
287
|
0 |
0 |
ref $_[0] ? : |
291
|
0 |
0 |
if ($to =~ s/^\+//) |
296
|
0 |
0 |
unless ($to =~ /^04\d{8}$/) |