let t_jk_event s = 
  try if Str.string_match reg_jkevent s 0 then
    Str.matched_group 1 s
  else "" with _ -> ""