| line |
!l |
l&&!r |
l&&r |
condition |
|
248
|
0 |
0 |
0 |
@_ and $$Data::Deep::CFG{'zap'} = shift() |
|
266
|
122 |
15 |
9 |
@_ and $$Data::Deep::CFG{'o_complex'} = shift() |
|
|
12737 |
1 |
0 |
@_ and $$Data::Deep::CFG{'o_debug'} = shift() |
|
|
0 |
0 |
1 |
@_ and $$Data::Deep::CFG{'o_follow_ref'} = shift() |
|
326
|
0 |
0 |
0 |
ref $l and out__("\n" . __d($l)) |
|
457
|
0 |
1 |
3 |
@_ and $$CFG{'o_key'} = shift() |
|
688
|
1 |
0 |
62 |
defined $node and $node = "'${node}'" |
|
730
|
9199 |
0 |
681 |
$realpack and $realtype |
|
|
9199 |
0 |
681 |
$realpack and $realtype and $id |
|
740
|
4666 |
0 |
4528 |
$ref eq 'HASH' and $_[-2] eq '%' |
|
750
|
7 |
0 |
4659 |
$ref eq 'ARRAY' and $_[-2] eq '@' |
|
|
7 |
1373 |
3286 |
$ref eq 'ARRAY' and $_[-2] eq '@' and $_[-1] != 0 |
|
886
|
11683 |
0 |
43 |
$realpack and $realtype |
|
|
11683 |
3 |
40 |
$realpack and $realtype and $id |
|
1026
|
50 |
23 |
57 |
$k eq 'SCALAR' and not defined $$gval |
|
1100
|
16 |
2725 |
0 |
defined $nb_occ and $nb_occ < 1 |
|
1116
|
665 |
0 |
11 |
$realpack and $realtype |
|
|
665 |
0 |
11 |
$realpack and $realtype and $id |
|
1138
|
0 |
63 |
1 |
defined $nb_occ and --$nb_occ < 1 |
|
1155
|
0 |
24 |
1 |
defined $nb_occ and --$nb_occ < 1 |
|
1178
|
0 |
10 |
4 |
defined *$where{'SCALAR'} and defined ${*$where{'SCALAR'};} |
|
1344
|
0 |
0 |
0 |
@a1 and @a2 |
|
1346
|
0 |
0 |
0 |
$_ eq pop @a2 and unshift @common, $_ |
|
1359
|
368 |
76 |
26 |
$$p1{'action'} eq 'remove' and $$p2{'action'} eq 'add' |
|
|
444 |
18 |
8 |
$$p1{'action'} eq 'remove' and $$p2{'action'} eq 'add' and __d($$p1{'val_orig'}) eq __d($$p2{'val_dest'}) |
|
1383
|
100 |
0 |
8 |
$patch[$o]{'action'} eq 'erase' and splice @patch, $o, 1 |
|
1410
|
377 |
0 |
2 |
$realpack and $realtype |
|
|
377 |
0 |
2 |
$realpack and $realtype and $id |
|
1430
|
14 |
389 |
83 |
defined $d1 and $d1 ne $d2 |
|
1431
|
389 |
12 |
2 |
not defined $d1 and defined $d2 |
|
1581
|
142 |
0 |
29 |
ref $res_Eq[$_] and ref $src |
|
|
142 |
12 |
17 |
ref $res_Eq[$_] and ref $src and ref $dst |
|
1589
|
5 |
0 |
12 |
$$src{'action'} eq 'remove' and $$dst{'action'} eq 'add' |
|
|
5 |
0 |
12 |
$$src{'action'} eq 'remove' and $$dst{'action'} eq 'add' and push @msg, @{$res_Eq[$_];} |
|
1628
|
0 |
9 |
5 |
defined *$d1{'SCALAR'} and defined ${*$d1{'SCALAR'};} |
|
1645
|
0 |
10 |
4 |
defined *$d2{'SCALAR'} and defined ${*$d2{'SCALAR'};} |
|
1990
|
0 |
0 |
0 |
ref $_ eq 'ARRAY' and do {
push @res, join('', @{$_;});
next
} |
|
|
0 |
262 |
0 |
ref $patch eq 'HASH' and do {
die 'domPatch2TEXT(): bad internal dom structure ' . __d($patch) unless exists $$patch{'action'};
my $action = $$patch{'action'};
my $v1 = $$patch{'val_orig'};
my $v2 = $$patch{'val_dest'};
my $txt = $action . '(' . patternDom2Text($$patch{'path_orig'}) . ',' . patternDom2Text($$patch{'path_dest'}) . ')=';
if ($action eq 'remove' or $action eq 'change') {
$v1 = __d($v1);
$v1 =~ s[/=>][/\\054>]g;
$v1 =~ s/\s=>\s/=>/gs;
$txt .= $v1;
} ;
$txt .= '/=>' if $action eq 'change';
if ($action eq 'add' or $action eq 'change') {
$v2 = __d($v2);
$v2 =~ s[/=>][/\\054>]g;
$v2 =~ s/\s=>\s/=>/gs;
$txt .= $v2;
} ;
push @res, $txt;
next
} |
|
2032
|
0 |
0 |
0 |
/^change$/ and $msg .= __d($$patch{'val_orig'}) . ' changed in ' . __d($$patch{'val_dest'}) |
|
|
0 |
0 |
0 |
/^add$/ and $msg .= __d($$patch{'val_orig'}) . ' added' |
|
|
0 |
0 |
0 |
/^remove$/ and $msg .= __d($$patch{'val_orig'}) . ' removed' |
|
|
0 |
0 |
0 |
/^move$/ and $msg .= 'Moved ' |
|
2114
|
78 |
346 |
3 |
defined $path[-1] and $path[-1] =~ /^\?/ |
|
|
424 |
0 |
3 |
defined $path[-1] and $path[-1] =~ /^\?/ and /^[\=\%\$\@\%\*]/ |
|
2130
|
181 |
68 |
3 |
$path[-2] eq '/' and exists $keys{$path[-1]} |
|
2219
|
2 |
0 |
17 |
$action eq 'add' and $v2 = $patch |