System error

error:  Can't locate object method "header_in" via package "Apache2::RequestRec" at /webroot/malcolmmason/occitan.net/ecrivain/writer.html line 28.
context: 
... 
24:  % if ($r->method eq 'POST') {
25:  <h2 class="red">More detail needed</h2>
26:  <p class="red">Please enter data in the &ldquo;Name&rdquo; &amp; &ldquo;Email&rdquo; fields.<br /><b>Remember</b>, without these I can&#146;t reply to you!</p>
27:  % } else {
28:  % $referer = $r->header_in("Referer") if $r->header_in("Referer");
29:  % }
30:  <form method="post" enctype="multipart/form-data" action="http://www.occitan.net/ecrivain/writer.html">
31:  <h1 class="title">PROFESSIONAL LETTER WRITER</h1>
32:  <h1 class="subtitle"><img alt="La Plume de l'Agasse" height="169" src="/pix/plume_agasse.gif" style="border: 0px;" width="536" /><br />1 Bd Bossuet<br />34290 ABEILHAN</h1>
... 
code stack:  /webroot/malcolmmason/occitan.net/ecrivain/writer.html:28
/webroot/malcolmmason/occitan.net/autohandler:53
raw error






























Can't locate object method "header_in" via package "Apache2::RequestRec" at /webroot/malcolmmason/occitan.net/ecrivain/writer.html line 28.


Trace begun at /usr/share/perl5/HTML/Mason/Exceptions.pm line 129
HTML::Mason::Exceptions::rethrow_exception('Can\'t locate object method "header_in" via package "Apache2::RequestRec" at /webroot/malcolmmason/occitan.net/ecrivain/writer.html line 28.^J') called at /webroot/malcolmmason/occitan.net/ecrivain/writer.html line 28
HTML::Mason::Commands::__ANON__ at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x9391ed0)') 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) called at /usr/share/perl5/HTML/Mason/Request.pm line 937
HTML::Mason::Request::call_next('HTML::Mason::Request::ApacheHandler=HASH(0x938d270)') called at /webroot/malcolmmason/occitan.net/autohandler line 53
HTML::Mason::Commands::__ANON__ at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0xa9e28b8)') called at /usr/share/perl5/HTML/Mason/Request.pm line 1276
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 1268
HTML::Mason::Request::comp(undef, undef, undef) 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(0x938d270)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 165
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x938d270)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 831
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0xa976d78)', 'Apache2::RequestRec=SCALAR(0xa0b78a0)') called at (eval 795) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0xa0b78a0)') called at -e line 0
eval {...} at -e line 0