いつか設立予定！

事業内容

trim

Perlではtrimがないらしいので正規表現で行います。

$value =~ s/^\s*(.*?)\s*$/$1/;


上記でtrimができます。
文章の最初と最後のスペースを取って真ん中の文字列の部分のみにしています。
(.*?) の部分が $1 になり、それを $valueに代入しています。



Perlへ