greymd/gist:a6933f2472b888a75014

## gistfile1.sh
# 南武線の駅の中で、快速→各停→快速 となっている不憫な並びの３駅を抽出するegisonシェル芸。

curl -so- -L goo.gl/4Gl1BL | tr ',\n' '\t' | egison -F 1cs -m '(match-all-lambda (list something) [ <join _ <cons $x <cons ,"快速" <cons $y <cons ,"各停" <cons $z <cons ,"快速" >>>>>>> [x y z]] )'

# [Result]
# {["鹿島田" "平間" "向河原"] ["登戸" "中野島" "稲田堤"] ["稲田堤" "矢野口" "稲城長沼"]}
#
# 既存のgrep等による単純な文字列マッチでは難しいオーバーラップしたパターンをループなしで検出できる。
# curlで習得する文字列には「稲田堤」はひとつしか含まれていないが、
# 例では稲田堤がオーバーラップしている。
	# 南武線の駅の中で、快速→各停→快速となっている不憫な並びの３駅を抽出するegisonシェル芸。

	curl -so- -L goo.gl/4Gl1BL \| tr ',\n' '\t' \| egison -F 1cs -m '(match-all-lambda (list something) [ <join _ <cons $x <cons ,"快速" <cons $y <cons ,"各停" <cons $z <cons ,"快速" >>>>>>> [x y z]] )'

	# [Result]
	# {["鹿島田" "平間" "向河原"] ["登戸" "中野島" "稲田堤"] ["稲田堤" "矢野口" "稲城長沼"]}
	#
	# 既存のgrep等による単純な文字列マッチでは難しいオーバーラップしたパターンをループなしで検出できる。
	# curlで習得する文字列には「稲田堤」はひとつしか含まれていないが、
	# 例では稲田堤がオーバーラップしている。