Its odd but it works :)

$ perl -m-File::Find::Rule -e "foreach (0..93) {print File::Find::Rule
+->new->file->in(qq(/.mnt.$_))}"

$ perl -MO=Deparse -m-File::Find::Rule -e "foreach (0..93) {print File
+::Find::Rule->new->file->in(qq(/.mnt.$_))}"
use File::Find::Rule ();
foreach $_ (0 .. 93) {
    print 'File::Find::Rule'->new->file->in("/.mnt.$_");
}
-e syntax OK
[download]