$p='#'x23;$b='#'x35;$s="* * * * * * $p\n";$f="* * * * * \n";
print"$s $f$s $f$s $f$s\n$b\n\n$b\n\n$b";