let b = Str.regexp ".*" in

print_string "OK\n";;