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