perl - 如何用null替换字符

Question

我有一个字符串 "8.53"我想要我的结果字符串"853" 我尝试了以下代码

tr|.||;

但它并不仅仅取代它的给予8.53。我尝试了另一种使用方式

tr|.|NULL|;

但是8N53任何人都可以建议我如何使用 tr 将字符替换为 NULL。

谢谢

Answer 1

您需要指定d修饰符以删除没有相应字符的字符：

tr/.//d;

或者您可以使用（较慢但更熟悉的）替换运算符：

s/\.//g;

Answer 2

您不想要tr，因为这会将第一个列表中的字符与第二个列表中的相应字符（N在您的示例中，因为这是第一个字符）进行音译。您将需要替换运算符。

my $var = "8.53";
$var =~ s/\.//;
print $var;

g如果要替换多个实例，请添加标志 ( s/\.//g)。