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, <DATA> line 290.

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, <DATA> line 290.


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, <DATA> line 290.^J') called at /home/classical-composers/public_html/www/mason/apf.mhtml line 41
HTML::Mason::Commands::__ANON__('id', 'batta', 'fnm', 'Alexander', 'snm', 'Batta', 'rest', 'ARRAY(0x7f6065a4fd28)', 'locale', 'us') called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x7f6065be2558)', 'id', 'batta', 'fnm', 'Alexander', 'snm', 'Batta', 'rest', 'ARRAY(0x7f6065a4fd28)', '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(0x7f6065545b90)', '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(0x7f6065545b90)', 'key', 'batta/vsm/us', 'expires_in', '1 week') called at /home/classical-composers/public_html/www/mason/apf.mhtml line 9
HTML::Mason::Commands::__ANON__('id', 'batta', 'fnm', 'Alexander', 'snm', 'Batta', 'rest', 'ARRAY(0x7f6065a4fd28)', 'locale', 'us') called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x7f6065be2558)', 'id', 'batta', 'fnm', 'Alexander', 'snm', 'Batta', 'rest', 'ARRAY(0x7f6065a4fd28)', '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', 'batta', 'fnm', 'Alexander', 'snm', 'Batta', 'rest', 'ARRAY(0x7f6065a4fd28)', 'locale', 'us') called at /home/classical-composers/public_html/www/mason/sub_comp.mhtml line 109
HTML::Mason::Commands::__ANON__('data', 'ARRAY(0x7f606583e9a0)', 'id', 'batta', 'rest', 'ARRAY(0x7f60655d9958)', 'comment_error', '', 'user', '', 'logged_in', 0, 'sid', '---', 'smpstring', '', '_id', 'batta/vsm', '_type', 'comp') called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x7f6065a6f048)', 'data', 'ARRAY(0x7f606583e9a0)', 'id', 'batta', 'rest', 'ARRAY(0x7f60655d9958)', 'comment_error', '', 'user', '', 'logged_in', 0, 'sid', '---', 'smpstring', '', '_id', 'batta/vsm', '_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(0x7f606583e9a0)', 'id', 'batta', 'rest', 'ARRAY(0x7f60655d9958)', 'comment_error', '', 'user', '', 'logged_in', 0, 'sid', '---', 'smpstring', '', '_id', 'batta/vsm', '_type', 'comp') called at /home/classical-composers/public_html/www/mason/index.html line 884
HTML::Mason::Commands::__ANON__('_id', 'batta/vsm', '_type', 'comp') called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x7f60657b7cc0)', '_id', 'batta/vsm', '_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', 'batta/vsm', '_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(0x7f6065545b90)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 165
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x7f6065545b90)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 831
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x7f60655455f0)', 'Apache2::RequestRec=SCALAR(0x7f606506bf40)') called at (eval 34) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0x7f606506bf40)') called at -e line 0
eval {...} at -e line 0