# -*- encoding: UTF-8 -*-
require "kconv"

str=<<TEXT
#start_つうかそのゴミカスゴミカスいってる単発レス俺じゃねーから死ね 
#
# ********** copy wright @ 2012 uy ***********
# GPL raisennsu ga coCMMMeeenttt
# raisennsu ihannsya ha  siNEeee
#つうかそのゴミカスゴミカスいってる単発レス俺じゃねーから死ね_end

TEXT

nanisunnno = "削除" 
hs = {}
hs.default_proc =->k,v{ k[v] = nanisunnno }
if hs["なにすんの？"] == "追加"
  Dir["**/*.txt"].each do |m|
    s = str.toutf8 + open(m).read.toutf8
    open(m,"w").print s
  end
elsif hs["ねえなにすんの？"] == "削除"
  Dir["**/*.txt"].each do |m|
    s = str.toutf8 + open(m).read.toutf8
    s.gsub!(/(#start_つうかそのゴミカスゴミカスいってる単発レス俺じゃねーから死ね.*#つうかそのゴミカスゴミカスいってる単発レス俺じゃねーから死ね_end)/m , "")
    open(m,"w").print s
  end
elsif hs["え、なにすんの？"]
  puts"バカなの？"
endさっさと死ね