line |
true |
false |
branch |
94
|
0 |
0 |
if (defined $ENV{'HOME'}) |
97
|
0 |
0 |
if ($home_dir =~ m[^([\-A-Za-z0-9_ /\.\@\+\\:]*)$]) { } |
345
|
0 |
0 |
if $self->account_name and $self->password |
346
|
0 |
0 |
if ($self->auto_login) { } |
350
|
0 |
0 |
unless $self->account_name |
385
|
0 |
0 |
if (defined $self->site_info->{'login_verify_re'}) |
393
|
0 |
0 |
unless $self->account_name |
395
|
0 |
0 |
unless $self->password |
399
|
0 |
0 |
if $self->error |
405
|
0 |
0 |
if (not $verify_re or $self->current_page->decoded_content =~ /$verify_re/is) { } |
411
|
0 |
0 |
unless ($self->error) |
432
|
0 |
0 |
if $tries_left < 1 |
|
0 |
0 |
if ($tries_left) |
433
|
0 |
0 |
unless defined $tries_left |
437
|
0 |
0 |
unless $self->site_info->{'login_form_no'} or $self->site_info->{'login_form_name'} |
443
|
0 |
0 |
if ($submitted) { } |
447
|
0 |
0 |
unless ($self->_check_login) |
451
|
0 |
0 |
if ($self->_account_verified) { } |
523
|
0 |
0 |
unless ($res) |
528
|
0 |
0 |
if ($res->is_error == 403 or $res->decoded_content =~ /$re/is) { } |
529
|
0 |
0 |
if ($res->is_error) { } |
535
|
0 |
0 |
if ($self->logged_in) |
550
|
0 |
0 |
if $self->{'_account_verified'}{$self->account_name} |
564
|
0 |
0 |
unless ($self->my_friend_id) |
610
|
0 |
0 |
if (open PREFS, '< ', $cache_filepath) |
621
|
0 |
0 |
unless (defined $prefs{'email'}) |
624
|
0 |
0 |
if ($res) |
628
|
0 |
0 |
unless (defined $prefs{'password'}) |
629
|
0 |
0 |
$prefs{'password'} ? : |
636
|
0 |
0 |
if ($res) |
645
|
0 |
0 |
unless open PREFS, '>', $cache_filepath |
649
|
0 |
0 |
unless close PREFS |
818
|
0 |
0 |
if ($options{'follow'}) |
835
|
0 |
0 |
if $self->human |
836
|
0 |
0 |
if ($self->error) { } |
886
|
0 |
0 |
if ($options{'re'}) |
892
|
0 |
0 |
if ($link) { } |
928
|
0 |
0 |
if ($self->{'page_cache'}{$url} and $self->{'page_cache'}{$url}->is_fresh) { } |
946
|
0 |
0 |
unless ($url->is_fresh) |
978
|
0 |
0 |
if ($self->logged_in and not $self->_check_login($res)) { } |
|
0 |
0 |
elsif ($res->is_success) { } |
991
|
0 |
0 |
if ($regexp) { } |
993
|
0 |
0 |
unless ($page =~ /$regexp/ism) |
1001
|
0 |
0 |
if (defined $self->site_info->{'error_regexs'}) |
1004
|
0 |
0 |
if ($page =~ /$error_regex/ism) |
1025
|
0 |
0 |
unless $page_ok |
1136
|
0 |
0 |
if ($options{'form'}) { } |
1140
|
0 |
0 |
if (ref $options{'page'} eq 'HTTP::Response') { } |
|
0 |
0 |
elsif (not $options{'page'}) { } |
1149
|
0 |
0 |
if $self->error |
1154
|
0 |
0 |
if ($options{'form_no'}) |
1156
|
0 |
0 |
unless (@forms > $options{'form_no'}) |
1161
|
0 |
0 |
if ($options{'form_name'}) |
1164
|
0 |
0 |
if ($form->attr('name') and $form->attr('name') eq $options{'form_name'}) |
1175
|
0 |
0 |
if ($options{'action'}) |
1181
|
0 |
0 |
if ($f->find_input($field)) { } |
1182
|
0 |
0 |
if ($f->find_input($field)->readonly) |
1192
|
0 |
0 |
if ($options{'die'}) |
1200
|
0 |
0 |
if $trying_again |
1203
|
0 |
0 |
if ($options{'button'}) { } |
|
0 |
0 |
elsif ($options{'no_click'}) { } |
1218
|
0 |
0 |
if ($@) |
1274
|
0 |
0 |
unless ($self->logged_in) |
1280
|
0 |
0 |
if ($self->mech->uri =~ /$home_uri_re/i) |
1288
|
0 |
0 |
if ($home_link = $self->mech->find_link('url_regex', qr/$link_re/i)) |
1319
|
0 |
0 |
unless (-d $self->cache_dir) |
1320
|
0 |
0 |
unless mkdir $self->cache_dir |