Perl:如何将文本附加到标量

1 perl scalar return append add

我在Perl中有一个子例程,它将读取一个哈希并打印出哈希中的所有键值对.但是,每次有一个键时,我不需要经过foreach循环和打印,而是需要将结果添加到一个标量中,然后在结尾处返回带有组合结果的标量.

在Java中我记得你可以轻松地将其他文本添加到变量中,但我不知道如何在Perl中执行此操作.

有什么想法吗?我将在下面添加我的打印代码,但我基本上想要将其添加到标量并在结尾处返回合并的标量(让我们说$output)

sub printSongs
{
    print "Song Database\n\n";
    foreach $key (keys %songList)
    {
       print "Song Title: $key ---- Duration: $songList{$key}\n";
    }
}
Run Code Online (Sandbox Code Playgroud)

PS:我试图搜索这个答案,因为它应该相对简单,但找不到任何东西.不确定追加是否是最好的词.

cho*_*oba 6

Perl中的连接运算符是..您还可以将其与作业组合.=.