sub my_wanted{
    if(exists $skip_them{$_})
    {
        $File::Find::Prune = 1 if -d $_;
        return;
    }
    do_process($_);
}