advanced code snippet search

Posted By

alfirth on 05/05/11


Tagged

tree hash recursion traverse


Versions (?)

traverse a hash

 / Published in: Perl
 
Expand | Embed | Plain Text 
  1. sub make_dirs {
  2.   my ($href, $path) = @_; 
  3.   foreach (keys %$href) {
  4.     make_dirs($href->{$_}, "$path$_/");
  5.   }
  6.   print $path; 
  7. }

Report this snippet  

You need to login to post a comment.