Perlを初めて使用しています。私はいくつかを複製しようとしていますhtmlentities()に相当するPerl
/PHPのhtmlentities()
のほとんどの機能は、これまでのところ、私はこれを持っている:それは私のニーズのために働いているが、私の中のマイクロオプティマイザはちょうど感じ
$str = '" \' < >';
$str = join('<', split('<', $str));
$str = join('>', split('>', $str));
$str = join('"', split('"', $str));
$str = join(''', split("'", $str));
print $str;
より良い方法が必要であるように。
私は正規表現にひどいので、多くのPerlチュートリアルではカスタムライブラリや非標準ライブラリを扱っています。これは私の経験不足のためです。
perl -v
は生成します。
v5.10.1
、考える「私の中のマイクロオプティマイザはちょうど良い方法でなければならないそこのように感じています」車輪の再発明を避けるために "。正しく書かれた他の/既存の方法を見つけて使用しようとする。 – user2864740
@ user2864740感謝の気持ちで感謝しますが、私は確かにかなりの時間、適切な既存の方法を見つけようとしました。確かに情報の過多がありますが、失敗しました。私が持っているすべての問題のために、SOを求めるのは通常私の最終的な手段です。 – MonkeyZeus
SOが最初の手段ではないことを確認してください:https://www.google.com/webhp?q=perl%20html%20encode – user2864740