syuturyokutxt = ''


#▼取得関数

#□タイトル、カテゴリー取得
getTitle = /<h3 class="title"><a href="index.html">(.*?)</
getCateJyunbi = /<span class="category">(.*?)a>/
getCate = />(.*?)</

#□コメント本文、日時、ハンドル取得。
getcometxt = /commentbody">(.*?)<\/dd>/m
getcomenitiji = /posted">posted at (.*?)<\/dd>/
getcomename = /handle">commented by (.*?)<\/dd>/m
getcomeifhavelinkname = /">(.*?)</m
getcomelink = /commented by <a href="(.*?)">/

#MTの公式では、コメントとトラックバックのURLは
#<a hrefタグ有りだけど、sbloのインポートはタグ不要。

#□トラックバック
gettoratitle = /_blank">(.*?)</
gettoralink = /href="(.*?)"/
gettorablogname = /name">from(.*?)</
gettoranitiji = /ked at (.*?)</
gettoratxt = /trackbackbody">(.*?)<\/dd>/







#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/100506/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/100769/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/101096/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/102060/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/102804/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/102882/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/103704/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/104580/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""


while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/105965/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/107147/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/107154/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/109359/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/110041/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/110138/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/110572/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/110702/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/112376/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/112470/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/112543/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/112825/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/113809/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/114604/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/115785/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/116971/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/117670/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/118688/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/118837/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/120192/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/120686/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/121284/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/121844/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/121880/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/122815/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/123623/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/123635/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/123705/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/125160/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/125889/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/126516/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/127374/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/127378/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/127742/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/128422/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/128733/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/129680/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/129703/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/132658/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/132879/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/134478/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/136677/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/136678/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/137758/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/137960/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/138443/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/138789/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/139358/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/139898/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/140466/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/140860/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/141439/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/141684/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/141896/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/142423/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/142424/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/142950/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/143463/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/143553/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/144136/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/144568/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/144646/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/144647/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/145615/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/146459/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/146478/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/146952/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/147786/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/147968/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/148515/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/148922/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/149437/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/149617/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/150353/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/150529/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/151155/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/151847/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/151856/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/152276/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/152729/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/153381/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/153809/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/153815/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/154053/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/154404/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/154832/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/154833/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/155380/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/155603/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/155604/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/156108/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/156638/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/156975/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/157297/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/157356/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/157359/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/157754/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/157830/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/158089/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/158768/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/158819/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/158820/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/159261/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/160075/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/161197/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/161340/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/161341/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/162218/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/162219/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/162220/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/162729/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/162955/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/163616/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/164381/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/165070/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/165490/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/165661/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/166097/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/166099/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/166196/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/166197/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/166569/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/166572/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/166870/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/167096/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/168003/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/168558/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""



while i < torahairetu.size
	#allcometxt作成。
	alltoratxt = alltoratxt + '
PING:
TITLE: '

	 #トラックバックタイトル
	if torahairetu[i].join =~ gettoratitle
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
URL: '
	 #トラックバック元URL
	if torahairetu[i].join =~ gettoralink
		alltoratxt = alltoratxt + $1
		#puts "トラックバック元URL取得OK"#test
	end
	
	alltoratxt = alltoratxt + '
IP: 
BLOG NAME: '

	#トラックバックしてきたブログの名前。
	if torahairetu[i].join =~ gettorablogname
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
DATE: '
	
	 #トラックバック日時
	if torahairetu[i].join =~ gettoranitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	alltoratxt = alltoratxt + nitijinew + ":00"

	
	#トラックバック本文(概要)
	if comehairetu[i].join =~ gettoratxt
		alltoratxt = alltoratxt + $1
	end
	
	alltoratxt = alltoratxt + '
-----'
	i = i + 1
end




#□出力テキストに、１エントリーのインポートファイル全部追加。
syuturyokutxt = syuturyokutxt + header + bodytxt + allcometxt + alltoratxt + footertxt











#▼ent
allhtml = ''
allhtml = File.read("D:/WINDOWS/Temp/sinseihikikomori.bblog.jp/entry/168900/index.html")


#□変数初期化
allcometxt = ""
nitijimoto = ""
nitijinew = ""
header = ''
bodytxt = ''
allcometxt = ''
footertxt = ''
comename = ''
alltoratxt = ''

#タイトル
if allhtml =~ getTitle
	titleTxt = $1
end

#カテゴリー
if allhtml =~ getCateJyunbi
	cateJyunbi = $1
end
if cateJyunbi =~getCate
	cate = $1
end

#ここから、不安。
#date(投稿時間)
getDateTimeJyunbi =/posted at (.*?)hankaku/
if allhtml =~ getDateTimeJyunbi
	dateTimeJyunbi = $1
end

getHidukeJyunbi = /(.*?) /
if dateTimeJyunbi =~ getHidukeJyunbi
	hidukeJyunbi = $1
end


getJikan = / (.*?) /
if dateTimeJyunbi =~ getJikan
	jikan = $1
end

hiduke = hidukeJyunbi[5,9] +"/"+ hidukeJyunbi[0,4]
toukouNitiji = hiduke + " " + jikan + ":00"

header = '
AUTHOR: 真性引き篭もりhankakueisuu
TITLE: ' + titleTxt + '
STATUS: Publish
ALLOW COMMENTS: 1
CONVERT BREAKS: 1
ALLOW PINGS: 1
DATE: ' + toukouNitiji + '
CATEGORY: ' + cate + '
-----
'

#内容を得る。末尾にゴミが付く。
getNaiyouP = /h3>(.*?)posted/xm
#getNaiyou = /en(.*?)box_hack/xm
if allhtml =~ getNaiyouP
	naiyouP = $1
end

#末尾に付いたゴミを切り取る。
lastnum = naiyouP.length - 18
naiyou = naiyouP[0..lastnum]

bodytxt = 'BODY: ' + naiyou + '
-----
EXTENDED BODY:

-----
EXCERPT:

-----
KEYWORDS:

-----'


footertxt = '

--------'

#コメント取得作業。scanで。


 #scanしてcomehairetuに格納。
comehairetu = allhtml.scan(/class="comment">(.*?)dl>/xm)

 #scanして、完成系のallcometxtを作成。

i = 0
allcometxt = ""
nitijimoto = ""
nitijinew = ""
while i < comehairetu.size
	#allcometxt作成。
	allcometxt = allcometxt + '
COMMENT:
AUTHOR: '

	 #コメント投稿者ハンドル
	if comehairetu[i].join =~ getcomename
		comename = $1
	end
	
	#リンクURL【<a href〜】を所持している場合は取り除く。
	if comename =~ getcomeifhavelinkname
		allcometxt = allcometxt + $1
	else
		allcometxt = allcometxt + comename
	end
	
	
	
	allcometxt = allcometxt + '
EMAIL:
IP:
URL: '
	 #コメント投稿者URL
	 #<dd class="user_handle">commented by <a href="url">ハンドル</a></dd>
	if comehairetu[i].join =~ getcomelink
		allcometxt = allcometxt + $1
		#puts "コメントurl取得OK"#OK
	end
	
	allcometxt = allcometxt + '
DATE: '
	
	 #コメント投稿者日時
	if comehairetu[i].join =~ getcomenitiji
		nitijimoto = $1
	end
	nitijinew = nitijimoto[5,5] +"/"+ nitijimoto[0,4] +" "+ nitijimoto[11,5]
	allcometxt = allcometxt + nitijinew + ":00"
	
	allcometxt = allcometxt + '
'

	#コメント本文
	if comehairetu[i].join =~ getcometxt
		striiing = ""
		striiing = $1.gsub(/\<br \/>/,"")#改行タグ不要
		allcometxt = allcometxt + striiing.gsub(/&gt; /,"＞")#半角の">"は文字化け。
	end
	
	allcometxt = allcometxt + '
-----'
	i = i + 1
end

#scanして、torahairetuに格納。
torahairetu = allhtml.scan(/class="trackback">(.*?)<\/dl>/xm)

i = 0
alltoratxt = ""
nitijimoto = ""
nitijinew = ""
alltoratxt = ""


〜〜〜299135行もある為、中略〜〜〜


#▼ファイル出力。
filetest = File.open("test.txt",'w')
filetest.puts syuturyokutxt
filetest.close