- 1 名前:デフォルトの名無しさん [2013/12/17(火) 14:19:52.00 ]
- Regular Expressionスレです。
質問する場合は必ず実装言語や処理系ソフトウェア名を示してください。 前スレ Regular Expression(正規表現) Part11 toro.2ch.net/test/read.cgi/tech/1362913813/ 天ぷら等2以降
- 23 名前:デフォルトの名無しさん mailto:sage [2013/12/18(水) 01:42:16.31 ]
- 正規化したら1行余計なものが増えるじゃん
sub namechk{ $buf = shift; $buf =~s/(\s|\.|=|=|・)/"."/meg; if ( $buf =~/(.+)\.(.+)\.(.+)/ ){ return ( $1 , $2 , $3 ); }elsif ( $buf =~/(.+)\.(.+)/ ){ return ( $1 , "" , $2 ); } }
|

|