Posted By

alfirth on 05/05/11


Tagged

tree hash recursion traverse


Versions (?)

traverse a hash


 / Published in: Perl
 

  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.