System error

error:  Can't use an undefined value as an ARRAY reference at /home/ym/WWW/news/item/index.html line 27.
context: 
... 
23:  <span><% date_format($news->{pdate}, '%d %D') %></span> <div class="icon_print"><a href="print/"><img src="/images/icon_print.gif" /></a><a href="print/">Версия для печати</a></div>
24:  <h3><% $news->{name} %></h3>
25:  <% $news->{body} %>
26: 
27:  % if ( scalar(@{$news->{file}})>0 ) {
28:  <div>Скачать документ:
29:  % for(my $j=0; $j<scalar(@{$news->{file}}); $j++) {
30:  <img src="/images/<% $ext[$news->{file}->[$j]->{file}->{ext}] %>.gif" alt="#" /><a href="<% $news->{file}[$j]->{file}->{src} %>">&nbsp;<% $news->{file}[$j]->{name} %></a>&nbsp;<span>(<% int($news->{file}->[$j]->{file}->{size} / 1024) < 1024 ? sprintf("%.0f Кб", $news->{file}->[$j]->{file}->{size} / 1024) : sprintf("%.2f Мб", $news->{file}->[$j]->{file}->{size} / 1048576) %>)</span>
31:  % }
... 
code stack:  /home/ym/WWW/news/item/index.html:27
/home/ym/WWW/news/dhandler:16
/home/ym/WWW/autohandler:76
raw error






























Can't use an undefined value as an ARRAY reference at /home/ym/WWW/news/item/index.html line 27.


Trace begun at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Exceptions.pm line 129
HTML::Mason::Exceptions::rethrow_exception('Can\'t use an undefined value as an ARRAY reference at /home/ym/WWW/news/item/index.html line 27.^J') called at /home/ym/WWW/news/item/index.html line 27
HTML::Mason::Commands::__ANON__ at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0xa162708)') called at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Request.pm line 1262
eval {...} at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Request.pm line 1252
HTML::Mason::Request::comp(undef, undef) called at /home/ym/WWW/news/dhandler line 16
HTML::Mason::Commands::__ANON__ at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0xa100080)') called at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Request.pm line 1262
eval {...} at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Request.pm line 1252
HTML::Mason::Request::comp(undef, undef, undef) called at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Request.pm line 1310
HTML::Mason::Request::scomp('HTML::Mason::Request::ApacheHandler=HASH(0xbc674a4)', 'HTML::Mason::Component::FileBased=HASH(0xa100080)') called at /home/ym/WWW/autohandler line 76
HTML::Mason::Commands::__ANON__ at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x9e3ec34)') called at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Request.pm line 1257
eval {...} at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Request.pm line 1252
HTML::Mason::Request::comp(undef, undef, undef) called at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Request.pm line 466
eval {...} at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Request.pm line 466
eval {...} at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Request.pm line 418
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0xbc674a4)') called at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/ApacheHandler.pm line 168
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0xbc674a4)') called at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/ApacheHandler.pm line 826
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x9d348fc)', 'Apache=SCALAR(0xbbcbdd4)') called at /home/ym/etc/modperl.conf line 42
YM::Mason::handler('Apache=SCALAR(0xbbcbdd4)') called at /dev/null line 0
eval {...} at /dev/null line 0