my $f = sub { my $t = shift; $$t =~ s/<!--#.*?-->//g; }; my $template = HTML::Template->new( filename => index.tmpl, global_vars => 1, loop_context_vars => 1, filter => $f );
However, the following works fine on MacOS X
my $template = HTML::Template->new( filename => index.tmpl, global_vars => 1, loop_context_vars => 1, filter => sub { $$ =~ s/<!--#.*?-->//g; } );
but gives the following error on Windows XP
HTML::Template->new() : fatal error occured during filter call: Modification of a read-only value attempted at D:/htdocs/perlpim/cal/index.cgi line 28.
at D:/htdocs/perlpim/cal/index.cgi line 29
Line 29 is filter => sub { $$ =~ s/<!--#.*?-->//g; }
what gives?
Thanks.
------------------------------------------------------- This SF.net email is sponsored by: The SF.net Donation Program. Do you like what SourceForge.net is doing for the Open Source Community? Make a contribution, and help us add new features and functionality. Click here: http://sourceforge.net/donate/ _______________________________________________ Html-template-users mailing list [EMAIL PROTECTED] https://lists.sourceforge.net/lists/listinfo/html-template-users