10 my ($l, $r) = map { eval $_ } split /\n/;
12 $sum += $. if compare($l,$r) == 1;
23 if (!defined $lv && defined $rv) {
25 } elsif (defined $lv && !defined $rv) {
27 } elsif (!defined $lv && !defined $rv) {
30 } elsif (ref $lv && ref $rv) {
31 $res = compare($lv, $rv);
32 } elsif (ref $lv && !ref $rv) {
33 $res = compare($lv, [$rv]);
34 } elsif (!ref $lv && ref $rv) {
35 $res = compare([$lv], $rv);