Re: [htmltmpl] mod_perl usage

SourceForge Headquarters 225 Broadway Suite 1600 San Diego, CA 92101 +1 (858) 422-6466

Here is some debug information. What follows is 3 attempts at my CGI. 
First was with the companyID of 1 (Traders International) 2nd was ID 26 
(Trading Zoo) and 3rd was ID 2 (omNovia).  Notice that the #3 attempt 
shows the same values from attempt #1 and that #3's debug output is MUCH 
less than the other 2.

So who is caching this? Sounds like mod_perl is. This is bad.

apologies for line wrapping..

Thanks,
Matthew

**** attempt #1 ****

### HTML::Template Debug ### In _parse:
### HTML::Template Debug ### /templates/background.tpl : line 1 : 
TMPL_IF login_menu start
### HTML::Template Debug ### /templates/background.tpl : line 2 : 
INCLUDE login_menu.tpl
### HTML::Template Debug ### /templates/login_menu.tpl : line 1 : parsed 
VAR header
### HTML::Template Debug ### /templates/login_menu.tpl : line 13 : 
parsed VAR companyid
### HTML::Template Debug ### /templates/login_menu.tpl : line 17 : 
parsed VAR companyname
### HTML::Template Debug ### /templates/login_menu.tpl : line 22 : 
parsed VAR companyid
### HTML::Template Debug ### /templates/login_menu.tpl : line 23 : 
parsed VAR companyid
### HTML::Template Debug ### /templates/login_menu.tpl : line 31 : 
parsed VAR companyid
### HTML::Template Debug ### /templates/login_menu.tpl : line 32 : 
parsed VAR companyid
### HTML::Template Debug ### /templates/login_menu.tpl : line 35 : 
parsed VAR footer
### HTML::Template Debug ### /templates/background.tpl : line 2 : 
/TMPL_IF end
### HTML::Template Debug ### /templates/background.tpl : line 4 : 
TMPL_IF login_page start
### HTML::Template Debug ### /templates/background.tpl : line 5 : 
INCLUDE login_page.tpl
### HTML::Template Debug ### /templates/background.tpl : line 5 : 
/TMPL_IF end
### HTML::Template _param Stack Dump ###
                    bless( do{\(my $o = undef)}, 'HTML::Template::VAR' ),
                  ], 'HTML::Template::COND' ),
           bless( do{\(my $o = undef)}, 'HTML::Template::VAR' ),
           bless( do{\(my $o = undef)}, 'HTML::Template::VAR' ),
           bless( do{\(my $o = undef)}, 'HTML::Template::VAR' ),
           bless( do{\(my $o = undef)}, 'HTML::Template::VAR' ),
           bless( do{\(my $o = undef)}, 'HTML::Template::NOOP' ),
                    bless( do{\(my $o = undef)}, 'HTML::Template::VAR' ),
                  ], 'HTML::Template::COND' ),
                 msg.innerHTML = "Your subscription expires in " + 
daysTillExpired + " days. " +
                 document.getElementById(\'popupinfo\').innerHTML += 
"&nbsp;<span style=\\"font-weight: bold; color: #FF0000;\\">Dual Windows 
disabled due to popup blocker.</span>";
                                 _javarow.innerHTML = _html;
         r.innerHTML = "<font color=red " + fSize + "><b>" + t + 
"</b></font>" + addedTxt;
                         c.innerHTML = "<b>Event Name:</b>" + sText;
                         c.innerHTML="";
### HTML::Template Cache Debug ### CACHE LOAD : 
/templates/background.tpl => a3b4215ada4a08b236710034cb1dd9c3
### HTML::Template Debug ### In output
### HTML::Template output Stack Dump ###
                    bless( do{\(my $o = 1)}, 'HTML::Template::VAR' ),
                  ], 'HTML::Template::COND' ),
           bless( do{\(my $o = '<!DOCTYPE HTML PUBLIC \'-//W3C//DTD HTML 
4.01 Transitional//EN\' \'http://www.w3.org/TR/html4/loose.dtd\'>
                 <td>')}, 'HTML::Template::VAR' ),
           bless( do{\(my $o = '1')}, 'HTML::Template::VAR' ),
           bless( do{\(my $o = 'Traders International')}, 
'HTML::Template::VAR' ),
</html>')}, 'HTML::Template::VAR' ),
           bless( do{\(my $o = undef)}, 'HTML::Template::NOOP' ),
                    bless( do{\(my $o = undef)}, 'HTML::Template::VAR' ),
                  ], 'HTML::Template::COND' ),
                 msg.innerHTML = "Your subscription expires in " + 
daysTillExpired + " days. " +
                 document.getElementById(\'popupinfo\').innerHTML += 
"&nbsp;<span style=\\"font-weight: bold; color: #FF0000;\\">Dual Windows 
disabled due to popup blocker.</span>";
                                 _javarow.innerHTML = _html;
         r.innerHTML = "<font color=red " + fSize + "><b>" + t + 
"</b></font>" + addedTxt;
                         c.innerHTML = "<b>Event Name:</b>" + sText;
                         c.innerHTML="";

**** attempt #2 ******

### HTML::Template Debug ### In _parse:
### HTML::Template Debug ### /templates/background.tpl : line 1 : 
TMPL_IF login_menu start
### HTML::Template Debug ### /templates/background.tpl : line 2 : 
INCLUDE login_menu.tpl
### HTML::Template Debug ### /templates/login_menu.tpl : line 1 : parsed 
VAR header
### HTML::Template Debug ### /templates/login_menu.tpl : line 13 : 
parsed VAR companyid
### HTML::Template Debug ### /templates/login_menu.tpl : line 17 : 
parsed VAR companyname
### HTML::Template Debug ### /templates/login_menu.tpl : line 22 : 
parsed VAR companyid
### HTML::Template Debug ### /templates/login_menu.tpl : line 23 : 
parsed VAR companyid
### HTML::Template Debug ### /templates/login_menu.tpl : line 31 : 
parsed VAR companyid
### HTML::Template Debug ### /templates/login_menu.tpl : line 32 : 
parsed VAR companyid
### HTML::Template Debug ### /templates/login_menu.tpl : line 35 : 
parsed VAR footer
### HTML::Template Debug ### /templates/background.tpl : line 2 : 
/TMPL_IF end
### HTML::Template Debug ### /templates/background.tpl : line 4 : 
TMPL_IF login_page start
### HTML::Template Debug ### /templates/background.tpl : line 5 : 
INCLUDE login_page.tpl
### HTML::Template Debug ### /templates/background.tpl : line 5 : 
/TMPL_IF end
### HTML::Template _param Stack Dump ###
                    bless( do{\(my $o = undef)}, 'HTML::Template::VAR' ),
                  ], 'HTML::Template::COND' ),
           bless( do{\(my $o = undef)}, 'HTML::Template::VAR' ),
           bless( do{\(my $o = undef)}, 'HTML::Template::VAR' ),
           bless( do{\(my $o = undef)}, 'HTML::Template::VAR' ),
           bless( do{\(my $o = undef)}, 'HTML::Template::VAR' ),
           bless( do{\(my $o = undef)}, 'HTML::Template::NOOP' ),
                    bless( do{\(my $o = undef)}, 'HTML::Template::VAR' ),
                  ], 'HTML::Template::COND' ),
                 msg.innerHTML = "Your subscription expires in " + 
daysTillExpired + " days. " +
                 document.getElementById(\'popupinfo\').innerHTML += 
"&nbsp;<span style=\\"font-weight: bold; color: #FF0000;\\">Dual Windows 
disabled due to popup blocker.</span>";
                                 _javarow.innerHTML = _html;
         r.innerHTML = "<font color=red " + fSize + "><b>" + t + 
"</b></font>" + addedTxt;
                         c.innerHTML = "<b>Event Name:</b>" + sText;
                         c.innerHTML="";
### HTML::Template Cache Debug ### CACHE LOAD : 
/templates/background.tpl => a3b4215ada4a08b236710034cb1dd9c3
### HTML::Template Debug ### In output
### HTML::Template output Stack Dump ###
                    bless( do{\(my $o = 1)}, 'HTML::Template::VAR' ),
                  ], 'HTML::Template::COND' ),
           bless( do{\(my $o = '<!DOCTYPE HTML PUBLIC \'-//W3C//DTD HTML 
4.01 Transitional//EN\' \'http://www.w3.org/TR/html4/loose.dtd\'>
                 <td>')}, 'HTML::Template::VAR' ),
           bless( do{\(my $o = '26')}, 'HTML::Template::VAR' ),
           bless( do{\(my $o = 'TradingZoo')}, 'HTML::Template::VAR' ),
</html>')}, 'HTML::Template::VAR' ),
           bless( do{\(my $o = undef)}, 'HTML::Template::NOOP' ),
                    bless( do{\(my $o = undef)}, 'HTML::Template::VAR' ),
                  ], 'HTML::Template::COND' ),
                 msg.innerHTML = "Your subscription expires in " + 
daysTillExpired + " days. " +
                 document.getElementById(\'popupinfo\').innerHTML += 
"&nbsp;<span style=\\"font-weight: bold; color: #FF0000;\\">Dual Windows 
disabled due to popup blocker.</span>";
                                 _javarow.innerHTML = _html;
         r.innerHTML = "<font color=red " + fSize + "><b>" + t + 
"</b></font>" + addedTxt;
                         c.innerHTML = "<b>Event Name:</b>" + sText;
                         c.innerHTML="";

******* attempt #3 ******

### HTML::Template Cache Debug ### CACHE HIT : 
/some/path//pages/sctest/templates/background.tpl => 
a3b4215ada4a08b236710034cb1dd9c3
### HTML::Template Debug ### In output
### HTML::Template output Stack Dump ###
                    bless( do{\(my $o = 1)}, 'HTML::Template::VAR' ),
                  ], 'HTML::Template::COND' ),
           bless( do{\(my $o = '<!DOCTYPE HTML PUBLIC \'-//W3C//DTD HTML 
4.01 Transitional//EN\' \'http://www.w3.org/TR/html4/loose.dtd\'>
                 <td>')}, 'HTML::Template::VAR' ),
           bless( do{\(my $o = '1')}, 'HTML::Template::VAR' ),
           bless( do{\(my $o = 'Traders International')}, 
'HTML::Template::VAR' ),
</html>')}, 'HTML::Template::VAR' ),
           bless( do{\(my $o = undef)}, 'HTML::Template::NOOP' ),
                    bless( do{\(my $o = undef)}, 'HTML::Template::VAR' ),
                  ], 'HTML::Template::COND' ),
                 msg.innerHTML = "Your subscription expires in " + 
daysTillExpired + " days. " +
                 document.getElementById(\'popupinfo\').innerHTML += 
"&nbsp;<span style=\\"font-weight: bold; color: #FF0000;\\">Dual Windows 
disabled due to popup blocker.</span>";
                                 _javarow.innerHTML = _html;
         r.innerHTML = "<font color=red " + fSize + "><b>" + t + 
"</b></font>" + addedTxt;
                         c.innerHTML = "<b>Event Name:</b>" + sText;
                         c.innerHTML="";