I know basic sorting but this goes too deep for me. In addition, is it bad to use the array to put strings with two 'artifical' elements. Is there another way to do it more efficient like:

$array->[0]->x=1;
$array->[0]->y=5;
...

Seems as if you want an array of named values (x, y, ...etc).

You may want to consider array of hashes (AoH).

#!/usr/bin/perl
use warnings; use strict;
use YAML;

my @Array;

$Array[0]{x} = 1,
$Array[0]{y} = 5;
#
# Or more concisely...
#
$Array[3] = {x => 3, y => 9};
$Array[2] = {x => 3, y => 4};
$Array[1] = {x => 6, y => 2};
$Array[4] = {x => 8, y => 1};

my @Sorted = sort {$a->{x} <=> $b->{x}
                || $b->{y} <=> $a->{y}} @Array;

print YAML::Dump(@Sorted);
[download]