| blib/lib/Statistics/R/IO/Rserve.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 9 | 23 | 39.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 196 | 3 | 152 | 0 | defined $args->{'fh'} and not ref $args->{'fh'} eq 'GLOB' && &Scalar::Util::openhandle($args->{'fh'}) || &blessed($args->{'fh'}) && $args->{'fh'}->isa('IO::Handle') |
| 198 | 0 | 155 | 0 | exists $args->{'server'} and !defined($args->{'server'}) || ref $args->{'server'} |
| 199 | 0 | 0 | 152 | &looks_like_number(scalar $self->port) and int $self->port == $self->port |
| 208 | 0 | 0 | 152 | &blessed($fh) and $fh->isa('IO::Socket') |
| line | l | !l | condition |
|---|---|---|---|
| 316 | 152 | 0 | shift() || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 196 | 0 | 0 | 152 | ref $args->{'fh'} eq 'GLOB' && &Scalar::Util::openhandle($args->{'fh'}) || &blessed($args->{'fh'}) && $args->{'fh'}->isa('IO::Handle') |
| 198 | 3 | 0 | 152 | !defined($args->{'server'}) || ref $args->{'server'} |
| 211 | 0 | 0 | 0 | $name // inet_ntoa($host) |