Of course, you could get those already with:

File::Finder->eval(sub { $File::Find::name =~ tr././. > 3 })-> ...;
[download]

But I suspect over time that I'll add every flag that GNUfind has. I just wanted the initial release to be fairly complete with respect to find2perl, which it is.