You don't show us how your Perl program is constructed, but the easiest approach would be:

my $re = '^Money$1';
'teststring' =~ /$re/
[download]

Also note that the regular expression is still valid as a regular expression, it just won't match much as $ implies matching the end of the string/line.