デコードとかで調べるとこんなんばっかり出てくる。 モジュール欲しかったので、隣の隣の席の人とか後ろの人に聞いたら教えてくれました。 $str =~ s/([^\w ])/'%' . unpack('H2', $1)/eg; $str =~ tr/ /+/; return $str; 便利。http://search.cpan.org/~gaa…