Perl - 데이터베이스에서 '을 디코드하거나 바꾸는 방법 데이터베이스 표시에서 작은 따옴표로 바꾸기

Question

나는 이것에 대해 많은 질문을 발견했지만 해결하는데 도움이되지는 못했습니다. 내 전문성 부족으로 프로 브.

PHP는 html_entity_decode이 도움이 될 수 있지만 펄은 그렇지 않습니다.

나는 그것이 12 '6 "로 표시하고 싶은 12' 6"

나는 시도했다 :. 내 MySQL 데이터베이스에서

나는 같은 설명에 ' " 다음과 같은 길이가

$string =~ s/:[']:/'/g; 
$string =~ s/:["]:/"/g; 
$string =~ s/'/'/g; 
$string =~ s/"/"/g; 
$string =~ s/\'/'/g; 
$string =~ s/\"/"/g; 
$string =~ s/\'/\'/g; 
$string =~ s/\"/\"/g; 
perl -pi -e 's:':':g' $_; #crashes. 
perl -pi -e 's:":":g' $string #also crashes. 
system -pi -e 's:':':g' $_; #crashes. 
system -pi -e 's:":":g' $string #also crashes. 

나는 누군가를 도울 수 있습니까?

Answer 1

HTML::Entities :

use warnings; 
use strict; 
use HTML::Entities; 

my $str = '12' 6"'; 
print decode_entities($str);