@unsorted_array = ([f, g, h, i, j], 
                   [a, b, c, d, e], 
                   [k, l, o, n, r], 
                   [j, a, o, n, e], 
                   [f, p, r, t, u]);
@big_table_array = sort {uc($a) cmp uc($b)}@unsorted_array;

$output_array_tracker = 0;
while ($output_array_tracker < ($#unsorted_array + 1)){
	print "$big_table_array[$output_array_tracker][0],
               $big_table_array[$output_array_tracker][1], 
               $big_table_array[$output_array_tracker][2], 
               $big_table_array[$output_array_tracker][3], 
               $big_table_array[$output_array_tracker][4], 
               $big_table_array[$output_array_tracker][5]
               \n";
	$output_array_tracker = $output_array_tracker + 1;
	}