12、22あたりを参考に転送量を調べようとしてるんですが
何回やってもInternal Server Errorになってしまう・・・

3行目の
while(<INPUT>){($userip, $user, $accessdate, $request, $answer, $sendbyte, $referer, $browser) = /(.*?)\s-(.*?)-\s\[(.*?)\]\s\"(.*?)\"\s(\d+?)\s(.*?)\s\"(.*?)\"\s\"(.*?)\"/; $totalbyte += $sendbyte;}

を削除するか、コメントアウトすれば動くんですが何でだろ?
原因分かる方教えて下さい。