$array1[$k] =~ s/^\s+//;
$array1[$k] =~ s/\s+$//;
$array2[$l] =~ s/^\s+//;
$array2[$l] =~ s/\s+$//;