map { $MaxLen = length($_) if length($_) > $MaxLen } @GrepList;