$i <= @searchTexts +1 -1;

##</code><code>##

$i <= @searchTexts;

##</code><code>##

  @searchTexts[$i] =~ s/^\s+//;

##</code><code>##

  @searchTexts[5] =~ s/^\s+//;