とりあえずPerl限定なんだけどさ・・・

こんな機能を実現するためのコードを書け！！（中級レベル）
っていう感じ頼むよ。

馬鹿な漏れに問題をだしておくれ。