在perl中使用字符替换

Question

您好，我试图从变量s中删除'：'。

我下面的过程，但它不工作

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

任何解决方案 感谢

Answer 1

第一：什么是$s？

如果它应该包含一个字符串，则必须添加引号。

Next：$(...)是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;