find sub { push @found, ... }
   for (reverse @found) { 

##</code><code>##

   find sub { unshift @found, ... }
   for (@found) {