$x=<>;$m=" "."  ##"x$x."
";$_="#   "x$x."
";s/ *$//;$o=" $_";print"$m$o$_$_$_$o$m";