I have an HTML file that is composed of other HTML files, something like this:<br><br><font size="1"><span style="font-family:courier new,monospace"><div data-role="collapsible" data-collapsed="true"></span><br style="font-family:courier new,monospace">
<span style="font-family:courier new,monospace">  <h3>Blah Blah</h3>                      </span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">    <TMPL_VAR m10></span><br style="font-family:courier new,monospace">
<span style="font-family:courier new,monospace"></div></span><br style="font-family:courier new,monospace"></font><br>now, m10 is just an HTML file somewhere, read into the template like so:<br><br><font size="1"><span style="font-family:courier new,monospace">open(FH, "$base/m10.html");</span><br style="font-family:courier new,monospace">
<span style="font-family:courier new,monospace">$tpl->param("m10" => do { local $/; while (<FH>) { my $next = <FH>; } });</span></font><br><br>the <font size="1"><span style="font-family:courier new,monospace">$next</span></font> bit is to ignore the first line, which has css info that I don't want this version to see ...<br>
<br>I swear this was working, and now it has mysteriously stopped working :(<br><br>Here's what Dumper tells me:<br><br><font size="1"><span style="font-family:courier new,monospace">[Wed May 16 19:54:13 2012] [error] [client xx.xx.x.xxx] FastCGI: stderr: $VAR1 = bless( do{\\(my $o = '')}, 'HTML::Template::VAR' );</span></font><br>
<br>Looks to me like it simply is not reading the file into the tpl param.<br><br>Anything obvious I am missing? Is this so hacky that it would work yesterday and then mysteriously stop today? Is there a better way to read the file into the tpl var? Keep in mind I have about 70 such files going in to this one tpl, and I read them all in using a loop, so, where it says "m10" up there, it could be really m$anything.<br>
<br>Thank you,<br>/bda<br><br><br><br><br><br><br><br>