by@k_hanazuki
AC
954ms
$h=<>-2;print$a="*"x($w=<>),$/,("*",$"x($w-2),"* ")x$h,$a
69 51
*************************************************** * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * ***************************************************