Perlで文字列を一般実体参照や数字文字参照に変換する方法まとめ
読了まで:約1分
しばらく
な
数字文字参照へ変換
数字文字参照へ
use Encode;
$str = '日本語文字列'; # 日本語の文字列
$charset = 'utf8'; # 文字列の文字コード
$str = decode($charset, $str); # utf8フラグを立てる
$str =~ s/(.)/ '&#' . ord($1) . ';'/eg; # 十進数で変換
print $str , "\n"; # 日本語文字列 となる
こんな
- 徒書 の
北村さんの エントリ Perl で 文字列を でもHTML 数値文字参照に 変換 これと 同じ例と、 他の 方法が 取り上げられているので 一読を お勧めします。
一般実体参照へ変換
一般実体参照へ
ただし日本語を
use HTML::Entities;
use Encode;
my $str = '<日本語&文字列>';
$str = decode('utf8', $str);
$str = encode_entities($str);
print $str , "\n"; # <日本語&文字列>となる。
こんなHTML::Entities
あと、
最後に
例と