Help for this page
sub sort_func { ... $result = $a_items[$item_no] <=> $b_items[$item_no];} return($result); }