foreach (...) {
foreach $catId (@catIds) {									   
push(@subArray, {	
				'categoryName' => $catNames[$catId}, 
				'categoryUrl' =>  "list.cgi?category=" . $catId
			})
}
push(@mainArray, @subArray)
}