正攻法ですが
use Mojo::Util qw(xml_escape url_escape); my $html_escaped_str = xml_escape $str; # HTMLエスケープ my $url_escaped_str = url_escape $str; # URLエスケープ
です。
Mojo::Util
には他にもウェブシステム開発で便利に使えそうな関数がありますので、公式ドキュメントを一度目を通しておくといいです。
use Mojo::Util qw(xml_escape url_escape); my $html_escaped_str = xml_escape $str; # HTMLエスケープ my $url_escaped_str = url_escape $str; # URLエスケープ
です。
Mojo::Util
には他にもウェブシステム開発で便利に使えそうな関数がありますので、公式ドキュメントを一度目を通しておくといいです。