line |
true |
false |
branch |
93
|
0 |
0 |
if (defined $ENV{'HOME'}) |
96
|
0 |
0 |
if ($home_dir =~ m[^([\-A-Za-z0-9_ /\.\@\+\\:]*)$]) { } |
344
|
0 |
0 |
if $self->account_name and $self->password |
345
|
0 |
0 |
if ($self->auto_login) { } |
349
|
0 |
0 |
unless $self->account_name |
384
|
0 |
0 |
if (defined $self->site_info->{'login_verify_re'}) |
392
|
0 |
0 |
unless $self->account_name |
394
|
0 |
0 |
unless $self->password |
398
|
0 |
0 |
if $self->error |
404
|
0 |
0 |
if (not $verify_re or $self->current_page->decoded_content =~ /$verify_re/is) { } |
410
|
0 |
0 |
unless ($self->error) |
431
|
0 |
0 |
if $tries_left < 1 |
|
0 |
0 |
if ($tries_left) |
432
|
0 |
0 |
unless defined $tries_left |
436
|
0 |
0 |
unless $self->site_info->{'login_form_no'} or $self->site_info->{'login_form_name'} |
442
|
0 |
0 |
if ($submitted) { } |
446
|
0 |
0 |
unless ($self->_check_login) |
450
|
0 |
0 |
if ($self->_account_verified) { } |
522
|
0 |
0 |
unless ($res) |
527
|
0 |
0 |
if ($res->is_error == 403 or $res->decoded_content =~ /$re/is) { } |
528
|
0 |
0 |
if ($res->is_error) { } |
534
|
0 |
0 |
if ($self->logged_in) |
549
|
0 |
0 |
if $self->{'_account_verified'}{$self->account_name} |
563
|
0 |
0 |
unless ($self->my_friend_id) |
609
|
0 |
0 |
if (open PREFS, '< ', $cache_filepath) |
620
|
0 |
0 |
unless (defined $prefs{'email'}) |
623
|
0 |
0 |
if ($res) |
627
|
0 |
0 |
unless (defined $prefs{'password'}) |
628
|
0 |
0 |
$prefs{'password'} ? : |
631
|
0 |
0 |
if ($res) |
639
|
0 |
0 |
unless open PREFS, '>', $cache_filepath |
811
|
0 |
0 |
if ($options{'follow'}) |
828
|
0 |
0 |
if $self->human |
829
|
0 |
0 |
if ($self->error) { } |
879
|
0 |
0 |
if ($options{'re'}) |
885
|
0 |
0 |
if ($link) { } |
921
|
0 |
0 |
if ($self->{'page_cache'}{$url} and $self->{'page_cache'}{$url}->is_fresh) { } |
939
|
0 |
0 |
unless ($url->is_fresh) |
971
|
0 |
0 |
if ($self->logged_in and not $self->_check_login($res)) { } |
|
0 |
0 |
elsif ($res->is_success) { } |
984
|
0 |
0 |
if ($regexp) { } |
986
|
0 |
0 |
unless ($page =~ /$regexp/ism) |
994
|
0 |
0 |
if (defined $self->site_info->{'error_regexs'}) |
997
|
0 |
0 |
if ($page =~ /$error_regex/ism) |
1018
|
0 |
0 |
unless $page_ok |
1129
|
0 |
0 |
if ($options{'form'}) { } |
1133
|
0 |
0 |
if (ref $options{'page'} eq 'HTTP::Response') { } |
|
0 |
0 |
elsif (not $options{'page'}) { } |
1142
|
0 |
0 |
if $self->error |
1147
|
0 |
0 |
if ($options{'form_no'}) |
1149
|
0 |
0 |
unless (@forms > $options{'form_no'}) |
1154
|
0 |
0 |
if ($options{'form_name'}) |
1157
|
0 |
0 |
if ($form->attr('name') and $form->attr('name') eq $options{'form_name'}) |
1168
|
0 |
0 |
if ($options{'action'}) |
1174
|
0 |
0 |
if ($f->find_input($field)) { } |
1175
|
0 |
0 |
if ($f->find_input($field)->readonly) |
1185
|
0 |
0 |
if ($options{'die'}) |
1193
|
0 |
0 |
if $trying_again |
1196
|
0 |
0 |
if ($options{'button'}) { } |
|
0 |
0 |
elsif ($options{'no_click'}) { } |
1211
|
0 |
0 |
if ($@) |
1267
|
0 |
0 |
unless ($self->logged_in) |
1273
|
0 |
0 |
if ($self->mech->uri =~ /$home_uri_re/i) |
1281
|
0 |
0 |
if ($home_link = $self->mech->find_link('url_regex', qr/$link_re/i)) |
1312
|
0 |
0 |
unless (-d $self->cache_dir) |
1313
|
0 |
0 |
unless mkdir $self->cache_dir |