my @array = ([0,5,3,8],
                [2,7,4,9],
                [2,6,2,19],
                [1,7,3,9],
                [1,4,2,6]);
my @sortedArray = 
  sort {
    $a->[0] <=> $b->[0]
              or
    $a->[1] <=> $b->[1]
              or # ab hier ist es zwar nicht mehr gefragt, aber...
    $a->[2] <=> $b->[2]
              or
    $a->[3] <=> $b->[3]
  } @array;