troubleshooting Question

-d and Find::File::name

Avatar of titanandrews
titanandrews asked on
Perl
2 Comments1 Solution203 ViewsLast Modified:
Hi,
   I have this snippet of code in which I am trying to print out all the directories. It does not work using the -d, but -f does print all the files. Why doesn't -d work for directories? What am I doing wrong? This should be a pretty basic question for an experienced Perl programmer.

<code>

use strict;
use File::Find;

sub wanted
{  
   if (-d $File::Find::name)
   {    
      print "$File::Find::name\n";
   }
}

find(\&wanted, 'C:/');

</code>

many thanks,

Barry

ASKER CERTIFIED SOLUTION
PC_User321

Our community of experts have been thoroughly vetted for their expertise and industry experience.

Join our community to see this answer!
Unlock 1 Answer and 2 Comments.
Start Free Trial
Learn from the best

Network and collaborate with thousands of CTOs, CISOs, and IT Pros rooting for you and your success.

Andrew Hancock - VMware vExpert
See if this solution works for you by signing up for a 7 day free trial.
Unlock 1 Answer and 2 Comments.
Try for 7 days

”The time we save is the biggest benefit of E-E to our team. What could take multiple guys 2 hours or more each to find is accessed in around 15 minutes on Experts Exchange.

-Mike Kapnisakis, Warner Bros