| line |
true |
false |
branch |
|
65
|
0 |
0 |
if $session->pid |
|
114
|
0 |
1 |
if $self->{'opts'}{'P'} |
|
117
|
0 |
1 |
if $self->{'opts'}{'A'} |
|
118
|
1 |
0 |
if ($self->connected) |
|
140
|
0 |
0 |
$self->{'opts'}{'t'} ? : |
|
147
|
0 |
0 |
if ($self->{'title_stack'} > 0) |
|
152
|
0 |
0 |
if ($hard) { } |
|
198
|
0 |
4 |
unless @configs |
|
199
|
0 |
4 |
if defined $ENV{'TELRC'} |
|
204
|
3 |
1 |
if (-r $conf) |
|
211
|
1 |
3 |
unless (defined $config->{'telrc_file'}) |
|
238
|
2 |
12 |
unless (defined $hostname) |
|
245
|
2 |
10 |
if ($hostname =~ qr"(ssh|telnet)://\[([a-zA-Z0-9\-\.\:]+)\](?::(\d+))?") { } |
|
|
2 |
8 |
elsif ($hostname =~ qr"(ssh|telnet)://([a-zA-Z0-9\-\.]+)(?::(\d+))?") { } |
|
|
2 |
6 |
elsif ($hostname =~ /\[(\S+)\](?::(\d+))?/) { } |
|
|
1 |
6 |
elsif ($hostname =~ tr/:// < 2 and $hostname =~ /(\S+):(\d+)$/) { } |
|
246
|
1 |
1 |
if $3 |
|
250
|
1 |
1 |
if $3 |
|
254
|
1 |
1 |
if $2 |
|
255
|
1 |
1 |
if $2 |
|
268
|
2 |
10 |
if (defined $self->profile->{'hostname'}) |
|
269
|
1 |
1 |
if (ref $self->profile->{'hostname'} eq 'CODE') { } |
|
301
|
7 |
4 |
if (@_) { } |
|
|
1 |
3 |
elsif (defined $self->{'methods'}) { } |
|
|
1 |
2 |
elsif ($self->{'opts'}{'m'}) { } |
|
|
1 |
1 |
elsif (defined $self->{'profile'}{'method'}) { } |
|
322
|
0 |
1 |
if $self->{'banners'} |
|
356
|
3 |
1 |
if ($host =~ /$h2/i or check_hostrange($h2, $host)) |
|
364
|
0 |
12 |
if (defined $profile->{'profile'}) |
|
388
|
20 |
2 |
unless defined $profile_arg |
|
390
|
2 |
0 |
if ($replace) |
|
399
|
0 |
2 |
if ($profile->{'handlers'}) |
|
424
|
0 |
0 |
if $@ |
|
447
|
0 |
2 |
if $type ne 'password' and $type ne 'enable' |
|
449
|
2 |
0 |
if (defined $profile->{$type} and $profile->{$type} ne '') |
|
455
|
0 |
0 |
if ($type eq 'enable' and ($profile->{$type} eq '' and $profile->{'password'} ne '')) |
|
461
|
0 |
0 |
if ($pass ne '') |
|
490
|
8 |
1 |
if not $_[1] and defined $_[0]{'session'} |
|
495
|
0 |
1 |
if $session and $session->pid |
|
541
|
2 |
2 |
if (defined $status) |
|
561
|
1 |
0 |
if ($profile->{'enablecmd'}) |
|
608
|
1 |
0 |
if (defined $App::Tel::rtr->{'sshoptions'} and scalar $App::Tel::rtr->{'sshoptions'} > 0) |
|
611
|
0 |
1 |
$App::Tel::rtr->{'ciphertype'} ? : |
|
618
|
0 |
1 |
if (defined $App::Tel::rtr->{'prompt'}) |
|
632
|
0 |
1 |
if $self->{'opts'}{'4'} |
|
633
|
0 |
1 |
if $self->{'opts'}{'6'} |
|
637
|
0 |
1 |
if ($_ eq 'ssh') { } |
|
|
0 |
1 |
elsif ($_ eq 'telnet') { } |
|
|
1 |
0 |
elsif ($_ eq 'test') { } |
|
666
|
0 |
0 |
if ($App::Tel::rtr->{'hostsearch'} and not $App::Tel::rtr->{'hostsearched'}) { } |
|
694
|
0 |
1 |
unless $self->connected |
|
709
|
1 |
0 |
unless $self->{'opts'}{'l'} |
|
713
|
0 |
0 |
if -f "/tmp/$file.log" |
|
739
|
0 |
0 |
if $opts->{'s'} |
|
767
|
1 |
0 |
if ($opts->{'a'}) { } |
|
777
|
0 |
1 |
if $opts->{'c'} |
|
779
|
0 |
1 |
if ($opts->{'x'}) |
|
781
|
0 |
0 |
unless open my $X, '<', $_ |
|
787
|
0 |
1 |
if (@args) { } |
|
789
|
0 |
0 |
if (ref $pagercmd eq 'CODE') { } |
|
|
0 |
0 |
elsif ($pagercmd) { } |
|
797
|
1 |
0 |
unless POSIX::isatty($self->{'stdin'}) |
|
798
|
0 |
0 |
if ($autocmds) |
|
801
|
0 |
0 |
if $@ |
|
806
|
0 |
0 |
if $_winch_it |
|
816
|
0 |
0 |
if $self->{'opts'}{'S'} |