find(sub { !/$skip_match/ && /$accept_match/ && -f && $handle_onfound->("$File::Find::name", $handle_onfound_args); }, $startdir);