| blib/lib/EasyDNS/DDNS/Config.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 37 | 72 | 51.3 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 61 | 0 | 0 | 3 | $cli->{'hosts'} and ref $cli->{'hosts'} eq "ARRAY" |
| 90 | 0 | 0 | 3 | defined $cfg_timeout and $cfg_timeout ne "" |
| 0 | 0 | 3 | defined $cfg_timeout and $cfg_timeout ne "" and $cfg_timeout =~ /^\d+$/ | |
| 93 | 2 | 0 | 1 | defined $cli_timeout and $cli_timeout =~ /^\d+$/ |
| 2 | 1 | 0 | defined $cli_timeout and $cli_timeout =~ /^\d+$/ and $cli_timeout > 0 |
| line | l | !l | condition |
|---|---|---|---|
| 15 | 3 | 0 | $args{'env'} || {} |
| 16 | 3 | 0 | $args{'cli'} || {} |
| 37 | 3 | 0 | $ini->{'easydns'}{'username'} // "" |
| 38 | 3 | 0 | $ini->{'easydns'}{'token'} // "" |
| 40 | 3 | 0 | $ini->{'update'}{'hosts'} // "" |
| 41 | 3 | 0 | $ini->{'update'}{'ip_url'} // "" |
| 42 | 3 | 0 | $ini->{'update'}{'timeout'} // "" |
| 44 | 3 | 0 | $ini->{'state'}{'path'} // "" |
| 55 | 1 | 2 | $env->{'EASYDNS_USER'} // "" |
| 56 | 1 | 2 | $env->{'EASYDNS_TOKEN'} // "" |
| 57 | 1 | 2 | $env->{'SDS_EASYDYN_STATE'} // "" |
| 72 | 3 | 0 | $cli->{'ip'} // "" |
| 73 | 1 | 2 | $cli->{'ip_url'} // "" |
| 75 | 1 | 2 | $cli->{'state_path'} // "" |
| 135 | 0 | 0 | $ENV{'HOME'} || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 20 | 0 | 0 | 3 | not defined $cfg_path or $cfg_path eq "" |
| 83 | 1 | 2 | 0 | $env_user || $cfg_user |
| 87 | 3 | 0 | 0 | $cli_ip_url || $cfg_ip_url || $def_ip_url |
| 97 | 3 | 0 | 0 | $cli_state || $env_state || $cfg_state_path || $def_state_path |
| 101 | 1 | 2 | 0 | $env_token || $cfg_token |
| 122 | 3 | 0 | 0 | $ENV{'HOME'} || Cwd::getcwd() |
| 127 | 3 | 0 | 0 | $ENV{'HOME'} || Cwd::getcwd() |
| 133 | 0 | 0 | 6 | not defined $path or $path eq "" |
| 149 | 0 | 0 | 3 | not defined $s or $s eq "" |