use strict;
use warnings;
use Data::Dump qw/pp dd/;
#use utf8;


my $string = 'copied from a web page looking like this: “Test.” ';

dd $string;

$string =~ s/“//g;
$string =~ s/”//g;

dd $string;

##</code><code>##

C:/Strawberry/perl/bin\perl.exe -w d:/tmp/pm/replace_quotes.pl 
"copied from a web page looking like this: \xE2\x80\x9CTest.\xE2\x80\x9D "
"copied from a web page looking like this: Test. "

##</code><code>##

C:/Strawberry/perl/bin\perl.exe -w d:/tmp/pm/replace_quotes.pl 
"copied from a web page looking like this: \x{201C}Test.\x{201D} "
"copied from a web page looking like this: Test. "