in reply to Getting a list of directories matching a pattern

Just use glob? or 
use File::Find::Rule qw/ find rule / ;
my @dirs = find( 
  directory => 
   maxdepth => 1,
   name => qr/tomcat_\d\d\d\d_\d\d/,
)->in($startdir);

[download]
  • Comment on Re: Getting a list of directories matching a pattern (glob File::Find::Rule)
  • Download Code

In Section Seekers of Perl Wisdom