$r = $r->{$_} ||= {} for split m|/|, $tmp; #/
$dl{$name} ||= $r;