@FullSort = sort {$a->[1] cmp $b->[1]
                   ||
                  $a->[0] cmp $b->[0]
                   ||
                  $a->[2] <=> $b->[2]} @data;