...
* Disclaimer: This source code has NOT been compiled.
*             I would estimate a couple more hours of development to
*             eliminate any typos and other compile time errors.
*             Then the fun starts.
...
*/

##</code><code>##

my ($f0,  $f1,  $f2,  $f3,  $f4,  $f5,  $f6,  $f7,  $f8,  $f9);
my ($f10, $f11, $f12, $f13, $f14, $f15, $f16, $f17, $f18, $f19);
my ($f20);
...
for ($idx = 0; $idx < $NUMBER_OF_ITEMS; $idx++) {

  $name = "mn" . $idx;
  $refval = eval "\$f". $idx;
  ...
}
##</code><code>##

$ref_urlsWithoutQueryStringTranslatedPassOne =
 translatePassOneWithoutQueryStringURLs($self->{urlsTrainingNonQueryGood}, $self->{CONSTANTS});
$ref_urlsWithoutQueryStringTranslatedPassOnePostGrouping =
 groupWithoutQueryStringURLsAfterPassOneTranslation($ref_urlsWithoutQueryStringTranslatedPassOne,
 $self->{CONSTANTS});