Select Code to Download

my @Array = (
...
    $a->[0] <=> $b->[0] or $b->[1] <=> $a->[1]
} @Array;

foreach @Elements (@Array) { 
   print @Elements[0]."x".@Elements[1];
}