use File::Find;

my $dir = ('new/');
find (\&wanted, $dir);

# this bascially lists all the directories, how can I get it to look for my 'mlc' files?

sub wanted      {
                print $File::Find::dir;

}