Result

WA

Duration

1234ms

Code [DL]

my ($h,$w)=<>,<>-2;say "*".($_>1&&$_<$h?$":"*")x$w."*
"for 1..$h

stdin

94
18

stdout

stderr

===SORRY!=== Error while compiling /volume/CODE
Unsupported use of <>; in Perl 6 please use lines() to read input, ('') to represent a null string or () to represent an empty list
at /volume/CODE:1
------> my ($h,$w)=<⏏>,<>-2;say "*".($_>1&&$_<$h?$":"*")x$w."