Am i close with this:

find (sub{
#skip directories which begin with 1
if (-d && $_ =~ /^\.snapshot.*$/)
{
$File::Find::prune = 1;
return;
}

edits => \&edits


},$dir);