Help for this page
i.e. previous run ... C:\1\x\3\4 C:\1\x\3 C:\1\x
foreach $node (keys(%current)) { if ($current{$node} eq "created") { ... if (($node =~ m/\/.+(\S)/) eq ($1)) { ($current{$node} = "unknown"), ($prior{$node2} = undef) +; }}}}}