以下は、ＳＪＩＳ漢字スペースに対応したTrimです。 use strict; my $string = " あ あ あ "; print Trim($string), "\n"; sub Trim { my ($str) = @_; my $space = '([ \t\n\r\f]|\x81\x40)'; $str =~ s/^$space+|$space+$//g; return $str; } このTrimは、…

年始からの法華経読誦がまだ続いていて、有り難かったです。 ついに『斉藤さん』が始まりました。なぜか心が熱く、なぜか嬉しかったです。 SQLServer2000でリンクサーバーの設定が上手くいかず、悲しかったです。