Perlを使った単語頻度プログラム

質問

ファイル１には
英文
I will go by car to the airport. I bought prior to boarding a plane to and snacks.
//改行
Upon arrival at Los Angeles International Airport, was not able to go to the local tourist hit by heavy rain.

...
のように英文が数十行記載されています。

ファイル２には
Car car level1
Airplane airplane level1　　
Snacks 　snacks level2
...
EOS
Upon upon level3
...
というように、第一引数に単語、第二引数に小文字の単語、最後にレベル（あまり意味をなさない・・・）が記載されているとします。EOSは改行です。

ファイル３には
car : 3
airplane : 1
snacks : 1
というように予めファイル１の中での各単語の出現回数をカウントしたテキストとなります。

この三つのファイルをもとに、
まずファイル２を読み込んでファイル２内の第二引数とファイル３の単語で同じものがあれば、カウント変数に出現回数（ファイル３内の数値）を加算することを繰り返し、それをＥＯＳの行になるまで繰り返し、ファイル１での該当の行と、ＥＯＳまでの出現回数を出力し、その都度、出現回数の多い順に文をソートするプログラムを教えてください。
結果例
1　：　　１２３　　:　I will go by car to the airport. I bought prior to boarding a plane to and snacks.
順位：出現回数：文

回答No.1

大野 悟（@ohnosatoru） · ベストアンサー

こんにちは。

１つ質問させてください。
Perlでプログラム言語をかけますか？

区切り文字などの指定がなかったので
ご自分で編集することができるということであれば
ざっくりとプログラムを回答させてもらいます。

ＥＯＳは改行とありますが、level表記の後には改行はないのでしょうか？
Car car level1 Airplane airplane level1 Snacks 　snacks level2 ... [改行]
Upon upon level3
ということでしょうか？

あと、要望の確認ですが、

１．三つのファイルがあります。
２．ファイル２を読み込んでファイル２内の第二引数を配列Ａに取り出します。
３．ファイル３を読み込んで単語と、出現回数のハッシュＢに取り出します。
４．配列Ａの単語がハッシュＢのキーと一致する（単語で同じものがあれば）場合
　　ハッシュＢの値を加算してハッシュＢ２をつくります。
５．ファイル１を配列Ｃに読み込みます。

---------------------------------------
ここまではなんとなくわかるのですが、それ以降がよくわかりませんので
わかりやすく説明していただけると助かります。

（該当行というのが不明なのですが）ハッシュＢのキー（もしかしたら配列Ａ）の単語が
　含まれている配列Ｃを探し出す。（複数行含まれている場合は1つだけ？）

該当の行（配列Ｃの行番号のこと？）と、ＥＯＳまでの出現回数（これはをハッシュＢ？それともハッシュＢ２？？）を出力し、その都度、出現回数の多い順に文をソートするプログラム

補足

質問文が不明瞭ですみませんでした。

>ＥＯＳは改行とありますが、level表記の後には改行はないのでしょうか？
level の後には改行となっています。
Car car level1　¥n
Airplane airplane level1　¥n　
Snacks 　snacks level2 ¥n
...
EOS ¥n
Upon upon level3 ¥n

＞　該当行というのが不明なのですが）ハッシュＢのキー（もしかしたら配列Ａ）の単語が
　含まれている配列Ｃを探し出す。（複数行含まれている場合は1つだけ？）

複数行にわたって含まれている場合は１つだけでお願いします。

＞　該当の行（配列Ｃの行番号のこと？）と、ＥＯＳまでの出現回数（これはをハッシュＢ？それともハッシュＢ２？？）を出力し、その都度、出現回数の多い順に文をソートするプログラム

出現回数はハッシュB２でお願いします。