http://www.perlmonks.org?node_id=1150777


in reply to Re: Using File::Find to create a hash of directory structure.
in thread Using File::Find to create a hash of directory structure.

Is something like:...

Looks similar to explain $scan = $scan->{shift @parts} ||= {} while @parts;