Thank you for your help. I WAS trying to find a way to use the power of the foreach structure, but you showed me the error of my ways. Would it be better to say something like this:

for (i = 0, i =< @#entries, i++)
     {
     $indexofleast = i;
     for (j = 1, j =< @#entries, j++)
          {
          if (@entries[j] lt @entries[i])
               {
               $indexofleast = j;
               }
          if ($indexofleast != i)
               {
               $temp = @array[j];
               $@array[j] = $@array[i];
               $@array[i] = $temp;
                }
          }
     }
[download]

Thanks for anymore help I can get. I stress that I am brand new to perl (so I'm really not sure if I'm using the @# operator correctly). This is supposed to work on single character strings and sort them.