| 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 |