System error

error:  Error during compilation of /home/httpd/htdocs/components/sequence/HCV/news/news.comp:
Prototype mismatch: sub HTML::Mason::Commands::news_date ($) vs none at /home/httpd/htdocs/components/sequence/HCV/news/news.comp line 31.

context: 
... 
27:  }
28:  else {
29:  return '';
30:  }
31:  }
32: 
33:  my $newsdir = '/content/sequence/HCV/news/';
34:  my @newsitems = ();
35: 
... 
code stack:  /usr/local/lib/perl5/site_perl/5.8.6/HTML/Mason/Interp.pm:326
/usr/local/lib/perl5/site_perl/5.8.6/HTML/Mason/Request.pm:892
/usr/local/lib/perl5/site_perl/5.8.6/HTML/Mason/Request.pm:996
/home/httpd/htdocs/content/hcv-index:61
raw error






























Error during compilation of /home/httpd/htdocs/components/sequence/HCV/news/news.comp:
Prototype mismatch: sub HTML::Mason::Commands::news_date ($) vs none at /home/httpd/htdocs/components/sequence/HCV/news/news.comp line 31.



Trace begun at /usr/local/lib/perl5/site_perl/5.8.6/HTML/Mason/Interp.pm line 589
HTML::Mason::Interp::_compilation_error('HTML::Mason::Interp=HASH(0xa87e768)', '/home/httpd/htdocs/components/sequence/HCV/news/news.comp', 'Error during compilation of :^JPrototype mismatch: sub HTML::Mason::Commands::news_date ($) vs none at /home/httpd/htdocs/components/sequence/HCV/news/news.comp line 31.^J^J^JStack:^J  [/usr/local/lib/perl5/site_perl/5.8.6/HTML/Mason/Interp.pm:320]^J  [/usr/local/lib/perl5/site_perl/5.8.6/HTML/Mason/Request.pm:892]^J  [/usr/local/lib/perl5/site_perl/5.8.6/HTML/Mason/Request.pm:996]^J  [/home/httpd/htdocs/content/hcv-index:61]^J') called at /usr/local/lib/perl5/site_perl/5.8.6/HTML/Mason/Interp.pm line 326
HTML::Mason::Interp::load('HTML::Mason::Interp=HASH(0xa87e768)', '/components/sequence/HCV/news/news.comp') called at /usr/local/lib/perl5/site_perl/5.8.6/HTML/Mason/Request.pm line 892
HTML::Mason::Request::fetch_comp('HTML::Mason::Request::ApacheHandler=HASH(0xae6bf64)', '/components/sequence/HCV/news/news.comp') called at /usr/local/lib/perl5/site_perl/5.8.6/HTML/Mason/Request.pm line 996
HTML::Mason::Request::comp('HTML::Mason::Request::ApacheHandler=HASH(0xae6bf64)', '/components/sequence/HCV/news/news.comp') called at /home/httpd/htdocs/content/hcv-index line 61
HTML::Mason::Commands::__ANON__ at /usr/local/lib/perl5/site_perl/5.8.6/HTML/Mason/Component.pm line 136
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0xaeb5880)') called at /usr/local/lib/perl5/site_perl/5.8.6/HTML/Mason/Request.pm line 1069
eval {...} at /usr/local/lib/perl5/site_perl/5.8.6/HTML/Mason/Request.pm line 1068
HTML::Mason::Request::comp(undef, undef, undef) called at /usr/local/lib/perl5/site_perl/5.8.6/HTML/Mason/Request.pm line 338
eval {...} at /usr/local/lib/perl5/site_perl/5.8.6/HTML/Mason/Request.pm line 338
eval {...} at /usr/local/lib/perl5/site_perl/5.8.6/HTML/Mason/Request.pm line 297
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0xae6bf64)') called at /usr/local/lib/perl5/site_perl/5.8.6/HTML/Mason/ApacheHandler.pm line 134
eval {...} at /usr/local/lib/perl5/site_perl/5.8.6/HTML/Mason/ApacheHandler.pm line 134
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0xae6bf64)') called at /usr/local/lib/perl5/site_perl/5.8.6/HTML/Mason/ApacheHandler.pm line 827
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0xa1635e0)', 'Apache=SCALAR(0xacca1c8)') called at /home/httpd/mason_handler.pl line 42
MyApp::Mason::handler('Apache=SCALAR(0xacca1c8)') called at /dev/null line 0
eval {...} at /dev/null line 0