perlsyn

1熱

7答えて

のために私はPerlのコードを見ていると私はこれを参照してください。 sub html_filter { my $text = shift; for ($text) { s/&/&/g; s/</</g; s/>/>/g; s/"/"/g; } return $text; }