debian/perl-framework/t/htdocs/modules/include/if8a.shtml


1
2
3
4
5
6
7
8
9

<!--#set var="x_p_ssl" value="1"-->
<!--#set var="x_SERVER_PORT" value="443"-->
<!--#if expr="($x_SERVER_PORT = 80) && ($x_p_ssl = 0)"-->
pass
<!--#elif expr="($x_SERVER_PORT = 443) && ($x_p_ssl = 1)"-->
pass
<!--#else -->
fail
<!--#endif -->