System error

error:  Can't locate object method "send_http_header" via package "Apache2::RequestRec" at /opt/cyberpomo/pages/fanfic/rss line 50.
context: 
... 
46:  $result = $rss->as_string;
47:  $m->cache->set("rss",$result,"3h");
48:  }
49: 
50:  $r->send_http_header;
51:  $m->print($result);
52:  </%init>
53: 
54:  <%flags>
... 
code stack:  /opt/cyberpomo/pages/fanfic/rss:50
raw error






























Can't locate object method "send_http_header" via package "Apache2::RequestRec" at /opt/cyberpomo/pages/fanfic/rss line 50.


Trace begun at /usr/local/lib/perl5/site_perl/5.8.9/HTML/Mason/Exceptions.pm line 129
HTML::Mason::Exceptions::rethrow_exception('Can\'t locate object method "send_http_header" via package "Apache2::RequestRec" at /opt/cyberpomo/pages/fanfic/rss line 50.^J') called at /opt/cyberpomo/pages/fanfic/rss line 50
HTML::Mason::Commands::__ANON__ at /usr/local/lib/perl5/site_perl/5.8.9/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x344e948)') called at /usr/local/lib/perl5/site_perl/5.8.9/HTML/Mason/Request.pm line 1273
eval {...} at /usr/local/lib/perl5/site_perl/5.8.9/HTML/Mason/Request.pm line 1268
HTML::Mason::Request::comp(undef, undef, undef) called at /usr/local/lib/perl5/site_perl/5.8.9/HTML/Mason/Request.pm line 467
eval {...} at /usr/local/lib/perl5/site_perl/5.8.9/HTML/Mason/Request.pm line 467
eval {...} at /usr/local/lib/perl5/site_perl/5.8.9/HTML/Mason/Request.pm line 419
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0x3436668)') called at /usr/local/lib/perl5/site_perl/5.8.9/HTML/Mason/ApacheHandler.pm line 168
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x3436668)') called at /usr/local/lib/perl5/site_perl/5.8.9/HTML/Mason/ApacheHandler.pm line 825
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x32356b8)', 'Apache2::RequestRec=SCALAR(0x31e6368)') called at /opt/cyberpomo/mason/handler.pl line 57
Cyberpomo::Mason::handler('Apache2::RequestRec=SCALAR(0x31e6368)') called at -e line 0
eval {...} at -e line 0