%resultsByCode = ();
	for ($i=1;$i<=5;$i++){
		push $resultsByCode{$resultStatus{$i}}, $i;
	}