Help for this page
$resultsByCode{$_}++ for @resultStatus;
$resultsByCode{$resultStatusCodes{$_}}++ for @resultStatus;
push @{$resultsByCode{$resultStatus[$_]}},$_+1 for 0..$#resultStatus;