#        1         2         3         4         5         6
#234567890123456789012345678901234567890123456789012345678901
mx;s//,$"@m.\n\n@m,$"@z.\n\u@_/until/^99.+/sm/split@m=(@z=(++$
m,bottle."s"x@-,of,beer),on,the,wall),@-?take7one7down7and.@
m.pass7it7around:go7to7the7store7and7buy7some7more;print$&.$`