@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->[0]) cmp uc($b->[0])} @unsorted_array;