如何替换perl变量中包含的以下字符？

Question

您好我需要自定义用于生成报告的perl脚本，

首先，它使用一个名为report的变量来编写csv，如下所示：

open report ,">report";

然后这个脚本执行一段时间，while代码只使用

print report $tpISAAddress."\n";

编写脚本的每一行，它会生成以下输出：

$ cat report
ZZ:BCGROUP
ZZ:ABGROS
ZZ:AGROUP
13808610

我想获得这个输出，有两列，分隔符是＆＃34;：＆＃34;，如下所示：

ZZ,BCGROUP
ZZ,ABGROS
ZZ,AGROUP
13808610

我唯一想要的是取代＆＃34;：＆＃34;至于＆＃34;，＆＃34;，问题在于我不知道如何实现这一目标，因为我对bash更熟悉，在bash中你可以在一段时间内做到这一点：

tpISAAddress=$(echo $tpISAAddress | sed s/:/,/g)

替换这个字符，但是我不确定perl中的进程是否实现了这一点，我想感谢支持，

Answer 1

喜欢这个

$tpISAAddress =~ s/:/,/;
print report $tpISAAddress."\n";