my $done_sort=0; # or some more meaningful name
while( $cond)
  { # probably some code here
    unless( $done_sort)
      { sort_the_array( @array);
        $done_sort=1;
      }
    # more code here
  }