note tye <p> Where you <code> push @{ $self->{dirs} },...</code> you need to add <code>push @{ $self->{levels} }, 1+$self->{level};</code>. When you [shift] off of <code>$self->{dirs}</code>, also do <code>$self->{level} = shift @{ $self->{levels} };</code>. </p><p> You can do it in more memory-efficient ways but the added complexity seems not worth it. </p> <div class="pmsig"><div class="pmsig-22609"><p align="right"> - [tye]<tt> &nbsp; &nbsp; &nbsp; &nbsp;</tt> </p></div></div> 375782 375782