alias longestword { tokenize 32 $1 while ($len($2)) tokenize 32 $iif($len($1) > $v1,$1,$2) $3- return $1 }