@short_nums = (99, 68, 86, 24);
...
              if (int($found[0]*1000) == $short_nums[$i])