System error

error:  Can't locate object method "header_in" via package "Apache2::RequestRec" at /webroot/malcolmmason/midicanal.info/contact.html line 26.
context: 
... 
22:  % if ($r->method eq 'POST') {
23:  <h2>More details please</h2>
24:  <p>Please complete the &#34;Name&#34; &#38; &#34;Email&#34; fields,<br>without this information we can&#39;t reply to you!</p>
25:  % } else {
26:  % $referer = $r->header_in("Referer") if $r->header_in("Referer");
27:  % }
28:  <form method="post" enctype="multipart/form-data">
29:  <input type="hidden" name="referer" value="<% $referer %>">
30:  <div class="boxwide">
... 
code stack:  /webroot/malcolmmason/midicanal.info/contact.html:26
/webroot/malcolmmason/midicanal.info/autohandler:33
raw error






























Can't locate object method "header_in" via package "Apache2::RequestRec" at /webroot/malcolmmason/midicanal.info/contact.html line 26.


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/midicanal.info/contact.html line 26.^J') called at /webroot/malcolmmason/midicanal.info/contact.html line 26
HTML::Mason::Commands::__ANON__ at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0xa8d1240)') 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(0xa8bd988)') called at /webroot/malcolmmason/midicanal.info/autohandler line 33
HTML::Mason::Commands::__ANON__ at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0xa8b3c88)') 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(0xa8bd988)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 165
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0xa8bd988)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 831
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0xa8375d0)', 'Apache2::RequestRec=SCALAR(0xa0b7830)') called at (eval 795) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0xa0b7830)') called at -e line 0
eval {...} at -e line 0