もじぴったんトリプルの構築を吐き出すプログラム

class String
	#カタカナ全部調べて文字に被りがあればtrue、なければfalse
	def is_mojikaburi?
		s = "ァ"
		while s != "ヽ" do
			return true if self.count(s) > 1
			s.succ!	#次の文字へ
		end
		return false
	end
end

pokemonname=[]
party = ""

#ファイルを開く
File.open('pokemonname.txt') do |file|
	p "=========ファイル読み込み開始～！========="
	file.each_line do |text|
		text.chomp!#改行文字などを消す
		pokemonname << text unless text == ""
	end
	p "=========ファイル読み込み終了～！========="
end


100.times do
	loop{
		party = ""

		#6体ランダムに選ぶ
		a = pokemonname.shuffle
		6.times do
			party += "#{a.pop},"
		end

			#文字に被りはあるか
		break unless party.is_mojikaburi?
	}
	p party
end

昨日10分で書いたやつ
誰か使うかもしれないので公開