my $foo     = 'bar';
say     "a-$foo-b";
    #:a-bar-b