Perl の文字列中で式を展開する

Perl は文字列中に変数を書くと展開してくれる

my $name = "koko_u";
print "Hello,$name\n";

出力

Hello,koko_u

しかし、式を計算することはできない

my $name = "koko_u";
my $times = 3;
print "Hello,${name}'!'x$times\n";

こんな感じで "" 中で '!'x$times の結果 !!! を出力したいが無理。
無理矢理すると

my $name = "koko_u";
my $times = 3;
print "Hello,${name}@{['!'x$times]}";

トリッキーすぎる。。。