揮発性のメモ2

http://d.hatena.ne.jp/iww/

2007-09-30から1日間の記事一覧

空白を\s*に置き換える

#!/usr/bin/perl $a=shift; $a =~ s/\s+/\\s\*/g; print "$a";