foreach my $item ( reverse @array ) {
  ...
}