$line =~ s/[\xE2\x80\x99]/'/g; # convert each of E2,80,99 into ' # or $line =~ s/\xE2\x80\x99/'/g; # convert hex sequence into '