| bin/vcardtidy | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 4 | 14 | 28.5 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 176 | 0 | 1 | 0 | $v ne $opts->{'vcard_version'} and $opts->{'force'} |
| 225 | 1 | 0 | 0 | $data2 eq $tidy2 and not $opts->{'force'} |
| line | l | !l | condition |
|---|---|---|---|
| 234 | 0 | 0 | Text::Diff::diff(\$t1, \$t2) || "(No change)\n" |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 130 | 1 | 0 | 0 | $vcard->get_simple_type("UID") // do { use feature 'state'; state @c = (('a', 'b', 'c', 'd', 'e', 'f'), 0..9); state $len_c = scalar @c; my $uid = join("-", map({join "", map({$c[rand $len_c];} @$_);} [1..8], [1..4], [1..4], [1..4], [1..12])); $vcard->add_node({"node_type", "UID"})->value($uid); warn qq[$opts->{'input'}: VCARD $i missing UID (set to "$uid")\n]; $uid } |
| 225 | 0 | 0 | 1 | $opts->{'nothing'} or $data2 eq $tidy2 and not $opts->{'force'} |