gettok$(word$,token,seperator)