〇〇に潜む、△△

hisomu.rb

#!/usr/bin/env ruby

`nkf /usr/share/mecab/dic/*/*.csv|grep ,名詞,>noun`
lim=3
n=`grep -oE ',[ァ-ンー]+,' noun|sort|uniq|tr -d ,`.split
puts "target,hisomu,hide,candidates", $*.filter{
  _1.size>lim-1&&_1 !~/\s/
}.map{|a|
  c=`echo #{a}|mecab -Oyomi`.chomp.chars
  (lim..c.size-1).map{
    c.each_cons(_1).map(&:join)
  }.flatten.filter{
    n.include?(_1)&&_1[0]!~/[ァィゥェォッャュョ]/
  }.map{
    r=`grep -E "^[^,]+,.*,#{_1}," noun`.split(?\n).map{|s|
      _=s.split(?,)[0]
      _ if a !~/#{_}/
    }.uniq.compact*?|
    [a,a+"に潜む",_1,r]*?, if r!=""
  }.compact
}.flatten.compact

$ chmod +x hisomu.rb
$ ./hisomu.rb 校内放送 林間学校 コインランドリー
target,hisomu,hide,candidates
校内放送,校内放送に潜む,ウナイ,宇内
校内放送,校内放送に潜む,イホウ,違法|彙報|医方|異邦
校内放送,校内放送に潜む,ホウソ,ホウ素|硼素|宝祚|法曾|法曽|訪ソ
校内放送,校内放送に潜む,コウナイ,港内|後内|口内|構内|行内|坑内|幸内|神内
校内放送,校内放送に潜む,ナイホウ,内包
校内放送,校内放送に潜む,ホウソウ,疱瘡|法曹|法曽|包装|奉送
林間学校,林間学校に潜む,リンカ,輪禍|燐火|隣家|リンカ|林下
林間学校,林間学校に潜む,カンガ,閑雅|官衙
林間学校,林間学校に潜む,リンカン,林冠|りんかん|輪かん|輪姦
コインランドリー,コインランドリーに潜む,コイン,雇員
コインランドリー,コインランドリーに潜む,インラン,いんらん|いん乱|淫乱
コインランドリー,コインランドリーに潜む,ランドリ,乱取り