在perl中使用字符替换

Question

您好我想从变量中删除':' s.

我做了以下程序但是没有用

$s="2:2:2:2:2";
$v=$(sed 's/://g' <<< $s);
print $v;

任何解决方案谢谢

Answer 1

第一:什么是$s？

如果它应包含字符串,则必须添加引号.

下一篇:$(...)是shell编程,而不是perl.

然后就不需要运行shell脚本来替换字符了.你可以在perl中做到这一点.

$s = "2:2:2:2:2";
$s =~ s/://g;
print $s;

如果你真的,无论出于什么原因,想要为此使用sed,并且你想编写一个执行它的perl脚本,你将不得不这样写:

#!/usr/bin/env perl
$s="2:2:2:2:2";
$v=`sed 's/://g' <<< $s`;
print $v;