<% $Response->Include('header.inc'); %> This file uses Apache::ASP both as a source and destination filter with Apache::Filter. By doing so it processes this file <%= basename($0) %> first, and then it processes the output from the first Apache::ASP script, compiling that output as an ASP script itself.

This is probably not how this would be used normally, you would usually chain some filter aware modules together like:

       SetHandler perl-script
       PerlHandler SomeFilter Apache::ASP Apache::SSI
       PerlSetVar Global .
       PerlSetVar Filter On

So we are about to print this code: <% my $code = "<\% print 'Code Output: '.time().''; %\>"; %> <%= $Server->HTMLEncode($code) %>

And here should be the executed version of it:

<% print $code; %>

This last code bit would get executed when the first script output gets processed by the second Apache::ASP destination filter. <% $Response->Include('footer.inc'); %>