I feel compelled to point out that perl can do this rather easily. But I really did like a little more low level on how a directory is listed.

http://blogs.perl.org/users/randal_l_schwartz/2011/03/perl-t...