Select Code to Download

Select or download this

#!/usr/bin/perl

...
 else {
     die $response->status_line;
 }

Select or download this

<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=ISO-8859-1
+"><HTML><HEAD><TITLE>Default Form</TITLE><!-- Title must match jsForm
+.htm's title --><SCRIPT TYPE="text/javascript" LANGUAGE="JavaScript">
+function passXML() {

...

}</SCRIPT></HEAD><BODY BGCOLOR="#000000" onload="passXML()"><FORM ACTI
+ON="" METHOD="POST" name="theForm"><!--- <input type="Hidden" name="F
+orm" value="True"> ---><INPUT TYPE="Hidden" NAME="ArcXMLRequest" VALU
+E=""><INPUT TYPE="Hidden" NAME="JavaScriptFunction" VALUE="parent.Map
+Frame.processXML"><INPUT TYPE="Hidden" NAME="BgColor" VALUE="#000000"
+><INPUT TYPE="Hidden" NAME="FormCharset" VALUE="ISO-8859-1"><INPUT TY
+PE="Hidden" NAME="RedirectURL" VALUE=""><INPUT TYPE="Hidden" NAME="He
+aderFile" VALUE=""><INPUT TYPE="Hidden" NAME="FooterFile" VALUE=""></
+FORM></BODY></HTML>