System error

error:  Can't use an undefined value as a symbol reference at /home/classical-composers/public_html/www/mason/apf.mhtml line 41.
context: 
... 
37:  $_am = encode('UTF-8',get("http://$ENV{'HTTP_HOST'}/mp/apf_4/apf4.cgi?Operation=ItemSearch&$composerkeywords=$keywords&SearchIndex=$searchindex&Sort=$Sort&locale=$locale&max_results=6"));
38:  $_am =~ s/.+<!--begin_amazon_incl-->(.+)<!--end_amazon_incl-->.+/$1/s;
39: 
40:  $_am = p('[No items found.]') if $_am =~ /Error: We did not find any matches/;
41:  binmode $_am;
42:  </%perl>
43:  <% $_am %>
44: 
code stack:  /home/classical-composers/public_html/www/mason/apf.mhtml:41
/usr/share/perl5/HTML/Mason/Request.pm:848
/home/classical-composers/public_html/www/mason/apf.mhtml:9
/home/classical-composers/public_html/www/mason/sub_comp.mhtml:109
/home/classical-composers/public_html/www/mason/index.html:884
raw error






























Can't use an undefined value as a symbol reference at /home/classical-composers/public_html/www/mason/apf.mhtml line 41.


Trace begun at /usr/share/perl5/HTML/Mason/Exceptions.pm line 129
HTML::Mason::Exceptions::rethrow_exception('Can\'t use an undefined value as a symbol reference at /home/classical-composers/public_html/www/mason/apf.mhtml line 41.^J') called at /home/classical-composers/public_html/www/mason/apf.mhtml line 41
HTML::Mason::Commands::__ANON__('id', 'babbi_gregorio', 'fnm', 'Gregorio', 'snm', 'Babbi', 'rest', 'ARRAY(0x7f60656ae950)', 'locale', 'us') called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x7f6065c1d448)', 'id', 'babbi_gregorio', 'fnm', 'Gregorio', 'snm', 'Babbi', 'rest', 'ARRAY(0x7f60656ae950)', 'locale', 'us') called at /usr/share/perl5/HTML/Mason/Request.pm line 919
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 918
HTML::Mason::Request::call_self('HTML::Mason::Request::ApacheHandler=HASH(0x7f606526b190)', 'SCALAR(0x7f6064ca5028)', 'ARRAY(0x7f6064ca5088)', 'SCALAR(0x7f6064ca5058)', 'CACHE_SELF') called at /usr/share/perl5/HTML/Mason/Request.pm line 848
HTML::Mason::Request::cache_self('HTML::Mason::Request::ApacheHandler=HASH(0x7f606526b190)', 'key', 'babbi_gregorio//us', 'expires_in', '1 week') called at /home/classical-composers/public_html/www/mason/apf.mhtml line 9
HTML::Mason::Commands::__ANON__('id', 'babbi_gregorio', 'fnm', 'Gregorio', 'snm', 'Babbi', 'rest', 'ARRAY(0x7f60656ae950)', 'locale', 'us') called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x7f6065c1d448)', 'id', 'babbi_gregorio', 'fnm', 'Gregorio', 'snm', 'Babbi', 'rest', 'ARRAY(0x7f60656ae950)', 'locale', 'us') called at /usr/share/perl5/HTML/Mason/Request.pm line 1302
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, 'id', 'babbi_gregorio', 'fnm', 'Gregorio', 'snm', 'Babbi', 'rest', 'ARRAY(0x7f60656ae950)', 'locale', 'us') called at /home/classical-composers/public_html/www/mason/sub_comp.mhtml line 109
HTML::Mason::Commands::__ANON__('data', 'ARRAY(0x7f6065f3d488)', 'id', 'babbi_gregorio', 'rest', 'ARRAY(0x7f60656bdb18)', 'comment_error', '', 'user', '', 'logged_in', 0, 'sid', '---', 'smpstring', '', '_id', 'babbi_gregorio', '_type', 'comp') called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x7f6068589330)', 'data', 'ARRAY(0x7f6065f3d488)', 'id', 'babbi_gregorio', 'rest', 'ARRAY(0x7f60656bdb18)', 'comment_error', '', 'user', '', 'logged_in', 0, 'sid', '---', 'smpstring', '', '_id', 'babbi_gregorio', '_type', 'comp') called at /usr/share/perl5/HTML/Mason/Request.pm line 1302
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, 'data', 'ARRAY(0x7f6065f3d488)', 'id', 'babbi_gregorio', 'rest', 'ARRAY(0x7f60656bdb18)', 'comment_error', '', 'user', '', 'logged_in', 0, 'sid', '---', 'smpstring', '', '_id', 'babbi_gregorio', '_type', 'comp') called at /home/classical-composers/public_html/www/mason/index.html line 884
HTML::Mason::Commands::__ANON__('_id', 'babbi_gregorio', '_type', 'comp') called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x7f6066360d48)', '_id', 'babbi_gregorio', '_type', 'comp') called at /usr/share/perl5/HTML/Mason/Request.pm line 1297
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, undef, '_id', 'babbi_gregorio', '_type', 'comp') called at /usr/share/perl5/HTML/Mason/Request.pm line 481
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 481
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 433
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0x7f606526b190)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 165
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x7f606526b190)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 831
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x7f60663692b0)', 'Apache2::RequestRec=SCALAR(0x7f60663387d0)') called at (eval 34) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0x7f60663387d0)') called at -e line 0
eval {...} at -e line 0