Select Code to Download

my @temp_reference_value = ("111", "11111111");

...
{
  ... use $temp_reference_value[$i] here ...
}

foreach my $value (@temp_reference_value)
{
  .. use unsubsripted $value here ...
  .."off by one" won't happen... a big advantage!
}