in reply to reading array from the last into begining

reverse

for (reverse @array) { # do stuff... }
-- vek --