package MyApp::HTML::Template; use base qw(HTML::Template); sub new { my $class = shift; my %params = @_; return $class->SUPER::new( %params, die_on_bad_params => 0, ); } #### sub param { my $self = shift; my %params = @_; $self->SUPER::param(%params); }