my $embedded   = "\n  \n";
my $multiline  = qqtrim{
    Hello
    $embedded
    World
};