my @array1 = map ucfirst, @array;