@_="0369cf"=~/./g;while("0369cf"=~/./g){for$b(@_){print"#$&$&$b$b$_$_\n"for@_}}
#                       ^^^^^^^^^^^^^^