$text2

#!/usr/bin/perl

my $text2 = 'db1$/SQL/GEMINI/StoredProcs/pboValidateClientRefNo_ClientID.sql';

# chr(36) = $
# http://perldoc.perl.org/functions/chr.html
# It's another way to represent $
# my $hmm = chr(36);
my $hmm = '$';

# \Q  Disable pattern metacharacters until \E
# http://perldoc.perl.org/perlreref.html#ESCAPE-SEQUENCES
# \Q makes it work =D
$text2 =~ s{\Q$hmm}{}g;

print "Content-type: text/html\n\n";
print "<html><h1>$text2</h1></html>\n";