my @array2 = map {split /\n/} @array;