<pre>function ltrim T,F  if F is empty then put " .-,;:@#$%?&*" into F  repeat while T is not empty    if first char of T is in F then delete char 1 of T else exit repeat  end repeat  return Tend ltrim</pre>