bobot

(* thx example for tagpix.pl *)

open Printf

let trim s =
  let len = String.length s in
  let rec aux = function
    | n when n = len -> ""
    | n -> 
        if s.[n] <> ' '