Как заменить символ с нулевым

Question

У меня есть одна строка "8.53" Я хочу, чтобы моя результирующая строка "853" Я попытался следующий код

tr|.||; 

, но его не заменяя его подачи только 8.53. я попробовал другой путь, используя

tr|.|NULL|; 

, но его предоставление 8N53 может кто-нибудь пожалуйста, предложите мне, как использовать тр заменить символ с NULL.

Благодаря

Answer 1

Вы не хотите tr потому что транслитерирует символы из 1-го списка с соответствующим символом в 2 списка (который был N в вашем примере, так как это был первый символ). Вам понадобится оператор замещения.

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

Добавьте g флаг, если существует несколько экземпляров, которые вы хотите заменить (s/\.//g).

Answer 2

Вы должны указать d модификатор для удаления символов без соответствующего полукокса:

tr/.//d; 

Или вы могли бы использовать (медленный, но более знакомый) оператор подстановки:

s/\.//g;