System error

error:  Can't locate object method "header_out" via package "Apache2::RequestRec" at /home/lighti/public_html/dev/ad.html line 39.
context: 
... 
35:  coffeecup => 'http://www.anrdoezrs.net/click-2555722-5057584' ,
36:  );
37: 
38:  if ($abbrev && $ads{$abbrev}) {
39:  $r->header_out(Location => $ads{$abbrev} );
40:  $r->status(302);
41:  $r->send_http_header("text/html");
42:  $m->abort(302);
43:  }
... 
code stack:  /home/lighti/public_html/dev/ad.html:39
/home/lighti/public_html/autohandler:1
raw error






























Can't locate object method "header_out" via package "Apache2::RequestRec" at /home/lighti/public_html/dev/ad.html line 39.


Trace begun at /usr/share/perl5/HTML/Mason/Exceptions.pm line 129
HTML::Mason::Exceptions::rethrow_exception('Can\'t locate object method "header_out" via package "Apache2::RequestRec" at /home/lighti/public_html/dev/ad.html line 39.^J') called at /home/lighti/public_html/dev/ad.html line 39
HTML::Mason::Commands::__ANON__('id', 'dreamweaver') called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x4951ad0)', 'id', 'dreamweaver') called at /usr/share/perl5/HTML/Mason/Request.pm line 1278
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 1268
HTML::Mason::Request::comp(undef, undef, undef, 'id', 'dreamweaver') called at /usr/share/perl5/HTML/Mason/Request.pm line 937
HTML::Mason::Request::call_next('HTML::Mason::Request::ApacheHandler=HASH(0x53e2f08)') called at /home/lighti/public_html/autohandler line 1
HTML::Mason::Commands::__ANON__('id', 'dreamweaver') called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x3fc9aa8)', 'id', 'dreamweaver') called at /usr/share/perl5/HTML/Mason/Request.pm line 1273
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 1268
HTML::Mason::Request::comp(undef, undef, undef, 'id', 'dreamweaver') called at /usr/share/perl5/HTML/Mason/Request.pm line 467
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 467
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 419
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0x53e2f08)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 165
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x53e2f08)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 831
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x3c25ce0)', 'Apache2::RequestRec=SCALAR(0x53c2298)') called at (eval 31) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0x53c2298)') called at -e line 0
eval {...} at -e line 0