$sum_point += $point;　は
$point = (split(/<>/, $data))[3];の後につけたほうがいいんでない?

サンプル見れなくなってる(´・ω・)