Select Code to Download

%{array[1]} = { key1 => 3, key2 => 2, key3 => "test" };
%{array[2]} = { key1 => 2, key2 => 1, key3 => "test2" };
...

&sortarrayofhashes(\@array,"key1","key2");

# NOTE, the following is not perlcode, just statement of fact

...
$array[4]{key1} == 3
$array[4]{key2} == 2
$array[4]{key3} == test