System error

error:  Can't locate object method "header_in" via package "Apache2::RequestRec" at /webroot/malcolmmason/occitan.net/ecrivain/ecrivain.html line 22.
context: 
... 
18:  % if ($r->method eq 'POST') {
19:  <h2 class="red">Encore des d&eacute;tails svp</h2>
20:  <p class="red">Veullieuz remplir les champs &ldquo;Nom&rdquo; &amp; &ldquo;Email&rdquo; svp.<br>Sans ces d&eacute;tails je ne peux pas vous r&eacute;prondre!</p>
21:  % } else {
22:  % $referer = $r->header_in("Referer") if $r->header_in("Referer");
23:  % }
24:  <form method="post" enctype="multipart/form-data" action="http://www.occitan.net/ecrivain/ecrivain.html">
25:  <input type="hidden" name="referer" value="<% $referer %>">
26: 
... 
code stack:  /webroot/malcolmmason/occitan.net/ecrivain/ecrivain.html:22
/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/ecrivain.html line 22.


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/ecrivain.html line 22.^J') called at /webroot/malcolmmason/occitan.net/ecrivain/ecrivain.html line 22
HTML::Mason::Commands::__ANON__ at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x98ee9f8)') 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(0xa9f0c60)') 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(0xa9f0c60)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 165
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0xa9f0c60)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 831
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0xa976d78)', 'Apache2::RequestRec=SCALAR(0xa965420)') called at (eval 795) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0xa965420)') called at -e line 0
eval {...} at -e line 0