System error

error:  Modification of a read-only value attempted at /rtx/pshark/cgi-bin/Pshark/My/Locales.pm line 13627.
context: 
... 
13623:  sub get_direct_parent {
13624:  my $locale = shift;
13625: 
13626:  return unless exists $leaves{$locale};
13627:  return $leaves{$locale}->{parents}->[0]->{token};
13628:  }
13629: 
13630:  sub is_locale_in_list { # could be dead code; RS 27/10/2009
13631:  my ($element, $list) = @_;
... 
code stack:  /rtx/pshark/cgi-bin/Pshark/My/Locales.pm:13627
/rtx/pshark/cgi-bin/Pshark/My/Locales.pm:13873
/rtx/pshark/mason_v2/components/navigation/links.html:392
/rtx/pshark/mason_v2/components/navigation/links.html:175
/rtx/pshark/mason_v2/components/navigation/footer.html:17
/rtx/pshark/mason_v2/autohandler:748
/rtx/pshark/mason_v2/minhandler:257
raw error






























Modification of a read-only value attempted at /rtx/pshark/cgi-bin/Pshark/My/Locales.pm line 13627.


Trace begun at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/Exceptions.pm line 129
HTML::Mason::Exceptions::rethrow_exception('Modification of a read-only value attempted at /rtx/pshark/cgi-bin/Pshark/My/Locales.pm line 13627.^J') called at /rtx/pshark/cgi-bin/Pshark/My/Locales.pm line 13627
Pshark::My::Locales::get_direct_parent('usa') called at /rtx/pshark/cgi-bin/Pshark/My/Locales.pm line 13873
Pshark::My::Locales::has_residential_for_sale('usa') called at /rtx/pshark/mason_v2/components/navigation/links.html line 392
HTML::Mason::Commands::__ANON__('county_state', 'United States', 'locale', 'usa') called at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::Subcomponent=HASH(0x2f913580)', 'county_state', 'United States', 'locale', 'usa') called at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/Request.pm line 1297
eval {...} at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, 'county_state', 'United States', 'locale', 'usa') called at /rtx/pshark/mason_v2/components/navigation/links.html line 175
HTML::Mason::Commands::__ANON__ at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x2d738cf0)') called at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/Request.pm line 1302
eval {...} at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef) called at /rtx/pshark/mason_v2/components/navigation/footer.html line 17
HTML::Mason::Commands::__ANON__('base_component', 'HTML::Mason::Component::FileBased=HASH(0x2ee6a3a8)', 'start_time', 1328835585.8832, 'secondary_footer', 1) called at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x2ecb8670)', 'base_component', 'HTML::Mason::Component::FileBased=HASH(0x2ee6a3a8)', 'start_time', 1328835585.8832, 'secondary_footer', 1) called at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/Request.pm line 1302
eval {...} at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, 'base_component', 'HTML::Mason::Component::FileBased=HASH(0x2ee6a3a8)', 'start_time', 1328835585.8832, 'secondary_footer', 1) called at /rtx/pshark/mason_v2/autohandler line 748
HTML::Mason::Commands::__ANON__('uri', '/mason/Canvass/') called at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x2e9455e8)', 'uri', '/mason/Canvass/') called at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/Request.pm line 1302
eval {...} at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, undef, 'uri', '/mason/Canvass/') called at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/Request.pm line 955
HTML::Mason::Request::call_next('HTML::Mason::Request::ApacheHandler=HASH(0x277807a8)') called at /rtx/pshark/mason_v2/minhandler line 257
HTML::Mason::Commands::__ANON__('uri', '/mason/Canvass/') called at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x2d256e68)', 'uri', '/mason/Canvass/') called at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/Request.pm line 1297
eval {...} at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, undef, 'uri', '/mason/Canvass/') called at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/Request.pm line 481
eval {...} at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/Request.pm line 481
eval {...} at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/Request.pm line 433
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0x277807a8)') called at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/ApacheHandler.pm line 168
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x277807a8)') called at /usr/lib/perl5/site_perl/5.10.1/HTML/Mason/ApacheHandler.pm line 825
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0xba438d8)', 'Apache2::RequestRec=SCALAR(0x27595e40)') called at (eval 1359) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0x27595e40)') called at -e line 0
eval {...} at -e line 0