my $ct=0;  my @nxxult = (); my @Ultmnsort = (); my @indexUlt = ();
for(my $rn=4;$rn<=32;$rn +=4)
  {
	for(my $bn=1;$bn<=$row[0];$bn++)
	{
	   $nxxult[$bn]=$ldx[$bn][$rn];
	}
       #@indexUlt=sort{$nxxult[$a]<=>$nxxult[$b]} 0 ... $#nxxult;
        $Ultmnsort[$ct]=$indexUlt[0];
        $Ultmxsort[$ct]=$indexUlt[$#indexUlt];
        $ct++;
        [$#indexUlt]\n");
 	print TEST3 ("ct = $ct\n");
  }

##</code><code>##

#@indexUlt=sort{$nxxult[$a]<=>$nxxult[$b]} 0 ... $#nxxult;

##</code><code>##

Use of uninitialized value in numeric comparison (<=>) at C:\SORT.pl line 791, <AREA> line 22371.