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