Except you don't want the comma in the character class. And why use two variables?

{
  my $temp = "\x{0024}\x{1F45}";
  s/([$temp])/$delimiter/gm;
}
[download]

Which if often used might be better written as

# somewhere in init code
my $descriptive_charclass_name = do {
    my $wide = "\x{0024}\x{1F45}";
    qr/[$widechars]/;
};

# ... later

s/($descriptive_charclass_name)/$delimiter/gm;
[download]

Makeshifts last the longest.