let parse_response (res : http_response) =
  let svlist = call_class_method_array "HTML::Form" "parse" [res#sv] in
  List.map (new html_form) svlist