s// / I understand this, and have used the empty expression before with m//, but never thought to try it with s///.
for($/)x16 A slick way of getting the newline (vis-à-vis -l print until...)! Changing the loop to for($_)x16 is informative. And, since a bare print prints both $_ and $/, I found it rather unobvious which variable holds the strings.