Lines Matching refs:lslen

135   my ($rs, $lslen, $rslen) = getsides($word);
136   return $word unless $lslen >= 3;
142   ($rs, $lslen, $rslen) = getsides($word);
143   return $word unless $lslen >= 3;
148     ($rs, $lslen, $rslen) = getsides($word);
149     return $word unless $lslen >= 3;
156     ($rs, $lslen, $rslen) = getsides($word);
157     return $word unless $lslen >= 3;
162     ($rs, $lslen, $rslen) = getsides($word);
163     return $word unless $lslen >= 3;
174         ($rs, $lslen, $rslen) = getsides($word);
180   return $word unless $lslen >= 3 && length $word > 3;
217   my($rs, $lslen); # left side and right side.
221     $lslen = length substr($word, 0, 3);
224     $lslen = $nonv_position;
227   return($rs, $lslen, length $rs);