$_ = "ABCDEFG";
s/(.)/$1\n/g;
print;