2009-08-08T23:58:30 scriptor

Code (perl): (dl )

$hash = $hash->{$el} ||= {};

1
2

$hash->{$el} = {} unless $hash->{$el};
$hash=$hash->{$el};