You are setting up your array incorrectly. You have an array of only one element. You want:

push @array, $x, $y, $z;
@array = sort{$a <=> $b} @array;
print "$array[0]\n";
[download]