print "<p>array length = ".$#{ @{ $pubs{$lang_group_id}{'pub_alpha_order'} } }."<p>\n";