System error

error:  Can't use string ("1") as an ARRAY ref while "strict refs" in use at /var/www/lib/GnaNewsCenter.pm line 390, <GEN600> line 16.
context: 
... 
386: 
387:  sub add {
388:  my($self, $item) = @_;
389:  push(@{$self->{'list'}}, $item);
390:  if ($self->{'last_n'} > 0 &&
391:  $#{@{$self->{'list'}}} >= $self->{'last_n'}) {
392:  shift(@{$self->{'list'}});
393:  }
394:  }
... 
code stack:  /var/www/lib/GnaNewsCenter.pm:390
/var/www/lib/GnaNewsCenter.pm:59
/var/www/html/shared/newscenter.html:49
/var/www/html/channels/students.html:42
/var/www/html/channels/autohandler:18
raw error






























Can't use string ("1") as an ARRAY ref while "strict refs" in use at /var/www/lib/GnaNewsCenter.pm line 390, <GEN600> line 16.


Trace begun at /usr/lib/perl5/vendor_perl/5.10.0/HTML/Mason/Exceptions.pm line 129
HTML::Mason::Exceptions::rethrow_exception('Can\'t use string ("1") as an ARRAY ref while "strict refs" in use at /var/www/lib/GnaNewsCenter.pm line 390, <GEN600> line 16.^J') called at /var/www/lib/GnaNewsCenter.pm line 390
GnaNewsStack::add('GnaNewsStack=HASH(0x9d8cb30)', '<table>^J<tr>^J<td>^J<b>California Virtual back online</b>^J^J<br>Posted on Wednesday 1999 November 24 at 08:50:39 GMT^J</td>^J</tr>^J<tr>^J<td>^JWe have received word that California Virtual Campus is back online at <a href=http://www.cvc.edu>http://www.cvc.edu</a>.^J^J</td>^J</tr>^J<tr>^J<td>^J</td>^J</tr>^J^J</table>^J') called at /var/www/lib/GnaNewsCenter.pm line 59
GnaNewsCenter::headlines('GnaNewsCenter=HASH(0x9e28af0)', 'headlines', 'GnaNewsSelector=HASH(0x9e36ec8)') called at /var/www/html/shared/newscenter.html line 49
HTML::Mason::Commands::__ANON__('lastn', 5, 'style', 'headlines', 'type', 'learning', 'header', 'Distance Learning News for Students', 'submit_news', 1, 'archive_link', '/mason/news/archive.html') called at /usr/lib/perl5/vendor_perl/5.10.0/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x9da29c8)', 'lastn', 5, 'style', 'headlines', 'type', 'learning', 'header', 'Distance Learning News for Students', 'submit_news', 1, 'archive_link', '/mason/news/archive.html') called at /usr/lib/perl5/vendor_perl/5.10.0/HTML/Mason/Request.pm line 1256
eval {...} at /usr/lib/perl5/vendor_perl/5.10.0/HTML/Mason/Request.pm line 1250
HTML::Mason::Request::comp(undef, undef, 'lastn', 5, 'style', 'headlines', 'type', 'learning', 'header', 'Distance Learning News for Students', 'submit_news', 1, 'archive_link', '/mason/news/archive.html') called at /var/www/html/channels/students.html line 42
HTML::Mason::Commands::__ANON__ at /usr/lib/perl5/vendor_perl/5.10.0/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x9d86348)') called at /usr/lib/perl5/vendor_perl/5.10.0/HTML/Mason/Request.pm line 1251
eval {...} at /usr/lib/perl5/vendor_perl/5.10.0/HTML/Mason/Request.pm line 1250
HTML::Mason::Request::comp(undef, undef) called at /usr/lib/perl5/vendor_perl/5.10.0/HTML/Mason/Request.pm line 915
HTML::Mason::Request::call_next('HTML::Mason::Request::ApacheHandler=HASH(0x9e28770)') called at /var/www/html/channels/autohandler line 18
HTML::Mason::Commands::__ANON__ at /usr/lib/perl5/vendor_perl/5.10.0/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x9d574a8)') called at /usr/lib/perl5/vendor_perl/5.10.0/HTML/Mason/Request.pm line 1251
eval {...} at /usr/lib/perl5/vendor_perl/5.10.0/HTML/Mason/Request.pm line 1250
HTML::Mason::Request::comp(undef, undef, undef) called at /usr/lib/perl5/vendor_perl/5.10.0/HTML/Mason/Request.pm line 460
eval {...} at /usr/lib/perl5/vendor_perl/5.10.0/HTML/Mason/Request.pm line 460
eval {...} at /usr/lib/perl5/vendor_perl/5.10.0/HTML/Mason/Request.pm line 412
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0x9e28770)') called at /usr/lib/perl5/vendor_perl/5.10.0/HTML/Mason/ApacheHandler.pm line 168
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x9e28770)') called at /usr/lib/perl5/vendor_perl/5.10.0/HTML/Mason/ApacheHandler.pm line 827
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x8ed46b0)', 'Apache2::RequestRec=SCALAR(0x9e57ed8)') called at (eval 82) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0x9e57ed8)') called at -e line 0
eval {...} at -e line 0