perl 替换

首处替换:
zabbix:/root# cat 1.pl 
$var='`aa`bb`cc`';
print "$var is $var
";
$var =~ s/`//;
print "$var is $var
";
zabbix:/root# perl 1.pl 
$var is `aa`bb`cc`
$var is aa`bb`cc`


全局替换:

zabbix:/root# cat 1.pl 
$var='`aa`bb`cc`';
print "$var is $var
";
$var =~ s/`//g;
print "$var is $var
";
zabbix:/root# perl 1.pl 
$var is `aa`bb`cc`
$var is aabbcc