in reply to Autogenerate descending arrays

How about simply reversing the resultant range?

@array = reverse (1..7);