You can shorten it a bit more by replacing
$remove($gettok($1-,2-3,32),$chr(32))
with
$2 $+ $3