A small helper function (E2) to get an array of all players names with an argument of max. length (player with name greater than Length, will have the name "cuted-down"). Very simple.

getPlayersNameSubstr.txt

function array getPlayersNameSubstr(Length)
{
    local Result = array()
    local Players = players()
    for (Index = 1, Players:count())
    {
        local Player = Players[Index, entity]
        Result:pushString(Player:name():sub(1, Length))
    }
    return Result
}