すいません。perlでピタゴラスの定理やりたいんですけど・・・

Aの2乗=Bの2乗+Cの2乗ですが、
BとCの値を入れて計算が終わったとして、
ルートAの出し方がわかりません。
お助け下さいませ・・・