view release on metacpan or  search on metacpan

site/perlscript.html  view on Meta::CPAN

		</tr>
		
		<tr>
		<td bgcolor=white><font size=-2 face="verdana" color=#993399><b><nobr>&nbsp;</nobr></b></font></td>

		<td bgcolor=white ><font face="verdana,helvetica" size=-1><b><nobr><a href="license.html" style="text-decoration:none"><font color=#063678>LICENSE</font></a></nobr></b></font></td>		

		</tr>
		<tr><td colspan=2><hr size=1></td></tr>
		<tr>
		<td bgcolor=white><font size=-2 face="verdana" color=#993399><b><nobr>&nbsp;</nobr></b></font></td>

		<td bgcolor=white ><font face="verdana,helvetica" size=-1><b><nobr><a href="eg/index.html" style="text-decoration:none"><font color=#063678>EXAMPLES</font></a></nobr></b></font></td>		

		</tr>
		
	</table>

	</td></tr>
	</table>

		<br>
		<center>
		<a href=http://www.apache-asp.org/><img src="powered_by_apache_asp.jpg" width="88" height="31" alt="Powered by Apache::ASP" border="0"></a>
		<br>
		<a href=http://perl.apache.org><img src="powered_by_modperl.gif" width="88" height="31" alt="Powered by ModPerl and Apache" border="0"></a>
		<br>
		<a href=http://www.perl.com><img src="rectangle_power_perl.gif" width="88" height="31" alt="Powered by Perl" border="0"></a>


</center>

</td>



<td valign=top bgcolor=white>
<font size=+0 face=verdana,arial>

<font face=verdana><font class=title size=+1 color=#555555><b>PERLSCRIPT</b></font>
<font face="courier new" size=3><pre>
</pre></font>Much work has been done to bring compatibility with ASP applications
written in <a href=http://www.activestate.com/ActivePerl/><font size=-1 face=verdana><b>PerlScript</b></font></a> under IIS.  Most of that work revolved around
bringing a Win32::OLE Collection interface to many of the objects
in Apache::ASP, which are natively written as perl hashes.
<font face="courier new" size=3><pre>
</pre></font>New as of version 2.05 is new functionality enabled with the 
CollectionItem setting, to giver better support to more recent PerlScript syntax.
This seems helpful when porting from an IIS/PerlScript code base.
Please see the <a href=config.html><font size=-1 face=verdana><b>CONFIG</b></font></a> section for more info.
<font face="courier new" size=3><pre>
</pre></font>The following objects in Apache::ASP respond as Collections:
<font face="courier new" size=3><pre>
        $Application
	$Session
	$Request-&gt;FileUpload *
	$Request-&gt;FileUpload(&#39;upload_file&#39;) *
	$Request-&gt;Form
	$Request-&gt;QueryString
	$Request-&gt;Cookies
	$Response-&gt;Cookies
	$Response-&gt;Cookies(&#39;some_cookie&#39;)	

  * FileUpload API Extensions
</pre></font>And as such may be used with the following syntax, as compared
with the Apache::ASP native calls.  Please note the native Apache::ASP
interface is compatible with the deprecated PerlScript interface.
<font face="courier new" size=3><pre>
 C = PerlScript Compatibility	N = Native Apache::ASP 
  
 ## Collection-&gt;Contents($name) 
 [C] $Application-&gt;Contents(&#39;XYZ&#39;)		
 [N] $Application-&gt;{XYZ}

 ## Collection-&gt;SetProperty($property, $name, $value)
 [C] $Application-&gt;Contents-&gt;SetProperty(&#39;Item&#39;, &#39;XYZ&#39;, &quot;Fred&quot;);
 [N] $Application-&gt;{XYZ} = &quot;Fred&quot;
	
 ## Collection-&gt;GetProperty($property, $name)
 [C] $Application-&gt;Contents-&gt;GetProperty(&#39;Item&#39;, &#39;XYZ&#39;)		
 [N] $Application-&gt;{XYZ}

 ## Collection-&gt;Item($name)
 [C] print $Request-&gt;QueryString-&gt;Item(&#39;message&#39;), &quot;&lt;br&gt;\n\n&quot;;
 [N] print $Request-&gt;{QueryString}{&#39;message&#39;}, &quot;&lt;br&gt;\n\n&quot;;		

 ## Working with Cookies
 [C] $Response-&gt;SetProperty(&#39;Cookies&#39;, &#39;Testing&#39;, &#39;Extra&#39;);
 [C] $Response-&gt;SetProperty(&#39;Cookies&#39;, &#39;Testing&#39;, {&#39;Path&#39; =&gt; &#39;/&#39;});
 [C] print $Request-&gt;Cookies(Testing) . &quot;&lt;br&gt;\n&quot;;
 [N] $Response-&gt;{Cookies}{Testing} = {Value =&gt; Extra, Path =&gt; &#39;/&#39;};
 [N] print $Request-&gt;{Cookies}{Testing} . &quot;&lt;br&gt;\n&quot;;
</pre></font>Several incompatibilities exist between PerlScript and Apache::ASP:
<font face="courier new" size=3><pre>
 &gt; Collection-&gt;{Count} property has not been implemented.
 &gt; VBScript dates may not be used for Expires property of cookies.
 &gt; Win32::OLE::in may not be used.  Use keys() to iterate over.
 &gt; The -&gt;{Item} property does not work, use the -&gt;Item() method.
</pre></font>

</font>
</td>

<td bgcolor=white valign=top>
&nbsp;
</td>

</tr>
</table>

</td></tr>
</table>
</center>

</body>
</html>