Thanks for being so helpful. How do i get it to NOT include the current working directory?
</code>
sub process_each_file
{
if( -d $File::Find::name)
{
print $File::Find::name, "\n";
}
}
find( \&process_each_file, '.' );
</code>
The first item in the list is .