[dash2@davehj plugins]$ perl
$foo='3$34£$';
$test = '3';
$foo =~ s/$test//g;
print $foo;

$4£$

[dash2@davehj plugins]$ perl
$foo='3$34£$';
$test = '$';
$foo =~ s/$test//g;
print $foo;

3$34£$