perlquestion bichonfrise74 Given the output from the code below, how would I get the final subdirectories for a certain directory? <code> #!/usr/bin/perl use strict; use File::Find; find( sub { print "$File::Find::name \n" if -d }, '/tmp/a' ); </code> Below is the output from the code above. <code> /tmp/a /tmp/a/b /tmp/a/b/c /tmp/a/b/c/e /tmp/a/b/d /tmp/a/b/d/g /tmp/a/b/d/g/h /tmp/a/b/d/g/i /tmp/a/b/k </code> But the output that I want is <code> /tmp/a/b/c/e /tmp/a/b/d/g/h /tmp/a/b/d/g/i /tmp/a/b/k </code> So, for example, I do not need the '/tmp/a' because it is still has sub-directories underneath it. <br><br> Thanks in advance.