use warnings;
use strict;

my $contents = 'foo®bar';
$contents =~ s/®/\&req;/g;
print "contents=:$contents:\n";
[download]

prints:

contents=:foo&req;bar:
[download]