ある問題が解けなくて困っています。
問題↓

ファイル xy-data.dat には，カンマで区切られた２つの整数データが並んだ行が何行か格納されている．
各行の最初の整数値をx，次の整数値をyとしてx-y座標上の点(x.y)をファイルの行数個考える．これらの点のうちで、原点が(4,7)、半径4の円の内側(円周上は除く)に含まれる点の数を出力するプログラムを作成せよ.

画面には、結果である数以外の出力をしないこと.

ファイルは
open("IN_FILE","<xy-data.dat");
としてopenし，このファイルからデータを読み出す時は，

$xy=<IN_FILE>
$xy =~ /(\d+)\D+(\d+)/;
$x = $1;
$y = $2;

として読み出せばよい．(まず変数$xyにファイルから１行読み出し，次に$xyの内容をカンマで区切られた前半と後半に分けて，前半を変数$xに後半を変数$yに代入する）
また，読み出しが終わったら，
close(IN_FILE);
としてクローズすること．

どうすればいいのか見当がつきません。お願いします