System error

error:  Modification of a read-only value attempted at /opt/spool3/wwwdata/mod/randimage/randimage.msn line 35.
context: 
... 
31:  return $result;
32:  }
33: 
34:  if($ri_session){ # запрос на картинку
35:  $r->send_cgi_header("Content-Type: image/png\n");
36:  $o->load( status=>'a', where=>{ name=>lc $ri_session } );
37:  my $data = '';
38:  my $i = $o->item;
39:  if($i && !$i->{ext_id}){
... 
code stack:  /opt/spool3/wwwdata/mod/randimage/randimage.msn:35
raw error






























Modification of a read-only value attempted at /opt/spool3/wwwdata/mod/randimage/randimage.msn line 35.


Trace begun at /usr/local/lib/perl5/site_perl/5.16/HTML/Mason/Exceptions.pm line 129
HTML::Mason::Exceptions::rethrow_exception('Modification of a read-only value attempted at /opt/spool3/wwwdata/mod/randimage/randimage.msn line 35.^J') called at /opt/spool3/wwwdata/mod/randimage/randimage.msn line 35
HTML::Mason::Commands::__ANON__('ipcountry', 'US', 'ri_session', 'e9bc1d14c76a5aa81b62d5ddabfcc415', 'giant', 1) called at /usr/local/lib/perl5/site_perl/5.16/HTML/Mason/Component.pm line 138
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x80757e6d8)', 'ipcountry', 'US', 'ri_session', 'e9bc1d14c76a5aa81b62d5ddabfcc415', 'giant', 1) called at /usr/local/lib/perl5/site_perl/5.16/HTML/Mason/Request.pm line 1300
eval {...} at /usr/local/lib/perl5/site_perl/5.16/HTML/Mason/Request.pm line 1295
HTML::Mason::Request::comp(undef, undef, undef, 'ipcountry', 'US', 'ri_session', 'e9bc1d14c76a5aa81b62d5ddabfcc415', 'giant', 1) called at /usr/local/lib/perl5/site_perl/5.16/HTML/Mason/Request.pm line 484
eval {...} at /usr/local/lib/perl5/site_perl/5.16/HTML/Mason/Request.pm line 484
eval {...} at /usr/local/lib/perl5/site_perl/5.16/HTML/Mason/Request.pm line 436
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0x8074b6198)') called at /usr/local/lib/perl5/site_perl/5.16/HTML/Mason/ApacheHandler.pm line 168
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x8074b6198)') called at /usr/local/lib/perl5/site_perl/5.16/HTML/Mason/ApacheHandler.pm line 825
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x8074437e0)', 'Apache2::RequestRec=SCALAR(0x80743c7f8)') called at /opt/spool3/wwwdata/lib/handler.pl line 109
HTML::Mason::handler('Apache2::RequestRec=SCALAR(0x80743c7f8)') called at -e line 0
eval {...} at -e line 0