まずは少し前の過去ログくらい事前に確認する脳味噌を付けろ。
その上で計算式が分からんのなら数学板にでも行って聞け。
計算式は書けるがPerlでの書き方が分からんのならその辺のリファレンスでも読め。

つーかもう宿題はここで聞かずに宿題スレに行け。
できないならもう諦めて白紙で提出しろ。
お前にPerlは過ぎた玩具だよ。