map {$_ = ucfirst} @array;