sort gs::long_strings_first @$raw_hash_keys_ar;
sort gs::long_strings_first($a,$b) @$raw_hash_keys_ar;