my %hits
for (....) {
	..
	$hits{$page} = [0,0,0,0] unless exists $hits{$page};
	$hits($page}[0]++;
	..
}