| lib/App/ipchgmon.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 22 | 55 | 40.0 |
| line | l | !l | condition |
|---|---|---|---|
| 71 | 0 | 0 | defined $opt_email and scalar @$opt_email |
| 105 | 0 | 8 | defined $opt_email and scalar @$opt_email |
| 154 | 6 | 0 | defined $opt_email and scalar @$opt_email |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 83 | 0 | 0 | 0 | $ip4 and $opt_4 || !$opt_6 |
| 85 | 0 | 0 | 0 | $ip6 and $opt_6 || !$opt_4 |
| 126 | 21 | 0 | 9 | valid4($line->[0]) and $v4 |
| 0 | 12 | 9 | valid6($line->[0]) and not $v4 | |
| 189 | 0 | 0 | 0 | defined $opt_mailport and not defined $opt_mailserver |
| line | l | !l | condition |
|---|---|---|---|
| 73 | 0 | 0 | $opt_4 ||= 0 |
| 74 | 0 | 0 | $opt_6 ||= 0 |
| 135 | 6 | 2 | $opt_leeway //= 0 |
| 194 | 1 | 1 | $opt_mailport ||= 25 |
| 206 | 1 | 8 | $opt_server ||= "" |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 72 | 0 | 0 | 0 | defined $opt_mailport or defined $opt_mailserver |
| 83 | 0 | 0 | 0 | $opt_4 || !$opt_6 |
| 85 | 0 | 0 | 0 | $opt_6 || !$opt_4 |
| 104 | 6 | 2 | 2 | not $latest or $overdue |
| 126 | 9 | 9 | 12 | valid4($line->[0]) and $v4 or valid6($line->[0]) and not $v4 |
| 207 | 9 | 0 | 0 | $opt_mailsubject ||= $opt_server . " has a new address" |
| 208 | 8 | 1 | 0 | $body ||= "$opt_server is now at $ip" |
| 214 | 0 | 9 | 0 | $opt_singleemail or 1 == scalar @$opt_email |