>perl -MFile::Find::Rule -E"say for File::Find::Rule->in('.')"
.
a
b
bar
bar/bar
foo
foo/foo

>perl -MFile::Find::Rule -E"say for File::Find::Rule->file->in('.')"
a
b
bar/bar
foo/foo