変数名	スカラー	配列	ハッシュ
history	●	●		historyを編集
ver	●	●		verを編集
file	●	●		fileを編集
tmp	●	●		tmpを編集
val	●	●		valを編集
memo	●	●		memoを編集
m	●	●		mを編集
wh	●	●		whを編集
str	●	●		strを編集
category	●	●		categoryを編集
w	●	●		wを編集
cont	●	●		contの編集をキャンセル
cook	●	●		cookを編集
param		●	●	paramを編集

$cont → $
@cont → @

1070行目  @cont = <FILE>;
1072行目  $cont = '';
1073行目  foreach (@cont) { $cont .= $_; }
1074行目  ($category,$cont) = split(/<!-!>/,$cont,2);
1075行目  if (!$cont) {
1076行目  $cont = $category;
1081行目  if ($cont =~ /^(?:$ascii|$twoBytes|$threeBytes)*?(?:$key)/) {
1102行目  @cont = split(/\n/,$cont);
1103行目  foreach (@cont) {