$_='#   'x~-<>.'#
';$o=" $_$_$_$_ $_",s/#.?/##/g;print$_="   $_",$o,$_