| pattern target reg result | reg := BRegexp default. pattern := 'm/(\d{2})/'. target := 'Smalltalk-80'. ^ [result := reg match: pattern from: target. result asString] ensure: [reg release] ===> '80'
| pattern target reg result | reg := BRegexp default. pattern := '/(\d{1,4})-(\d{1,4})-(\d{4})/'. target := '03-765-5678'. result := reg match: pattern from: target. result isMatched ifTrue: [Transcript cr; show: result asString] ifFalse: [Transcript cr; show: 'not matched']. [[reg hasNext] whileTrue: [ result := reg nextResult. Transcript cr; show: result asString. ]] ensure: [reg release]. Transcript ===> 03-765-5678 Transcript ===> 03 Transcript ===> 765 Transcript ===> 5678
| pattern target reg | reg := BRegexp default. pattern := 's/(\d\d)-\d{4}-\d{4}/$1-xxxx-xxxx/'. target := 'Yokohama 045-222-1111 Osaka 06-5555-6666'. ^ [reg substitute: pattern from: target] ensure: [reg release]. ===> 'Yokohama 045-222-1111 Osaka 06-xxxx-xxxx'
| pattern target reg | reg := BRegexp default. pattern := 'tr/Ts/tS/'. target := 'smallTalk'. ^ [reg translate: pattern from: target] ensure: [reg release]. ===> 'Smalltalk'
| pattern target reg | pattern := '/ *\d{2,3}-\d{3,4}-\d{4} */'. target := 'Yokohama 045-222-1111 Osaka 06-5555-6666 Tokyo 03-1111-9999'. reg := BRegexp default. [ reg split: pattern from: target limit: 0. [reg hasNext] whileTrue: [ Transcript cr; show: reg nextResult asString. ]. ] ensure: [reg release]. Transcript ===> Yokohama Transcript ===> Osaka Transcript ===> Tokyo
SEO | [PR] 爆速!無料ブログ 無料ホームページ開設 無料ライブ放送 | ||