удалить все. from string perl

Question

Я просто хочу удалить все. из этой строки

вход: 1.2.3

выход: 123

Я пробовал:

my $version = '1.2.3'; 
(my $version_app = $version) =~ s/\.//g; 

Но я получаю сообщение об ошибке.

Answer 1

my $version = '1.2.3'; 
my $version_app = $version; 
$version_app =~ s/\.//g; 

Необходимо сделать трюк.

Причина линии

my $version_app = $version; 

потому, что путь $ версия остается '1.2.3' и $ version_app устанавливается в '123'.