4moji.rb

#!/usr/bin/ruby -Ku
# -*- coding: utf-8 -*-
r = /\A(([あいうえおか-もやゆよら-ろわ-んアイウエオカ-モヤユヨラ-ロワ-ヴ]|う゛)[ぁぃぅぇぉゃゅょゎァィゥェォャュョヮ]?){2}[×☆]?(([あいうえおか-もやゆよら-ろわ-んアイウエオカ-モヤユヨラ-ロワ-ヴ]|う゛)[ぁぃぅぇぉゃゅょゎァィゥェォャュョヮ]?){2}っ?！?\z/

while l = gets
    l.chomp!
    if r.match(l)
        puts "#{l}は4文字タイトルなんじゃないかなあ"
    else
        puts "#{l}は4文字タイトルじゃないんじゃないかなあ"
    end
end