$data =~ s/“/“/g; # change the lines
$data =~ s/”/”/gi;
$data =~ s/’/’/gi;