System error

error:  Can't use an undefined value as an ARRAY reference at /local/www/htdocs/gw_japan/html/products/product.html line 27.
context: 
... 
23:  my $Lang = $Vars{Lang};
24:  my $type = ucfirst $M{$model}->[2];
25: 
26:  my $S = $m->comp('../mason/getSeries.mas', series => $series);
27:  my @models = @{$M{uc $series}};
28:  shift @models;
29:  </%init>
30: 
31:  % unless ($Vars{CurrentType} eq 'display') {
... 
code stack:  /local/www/htdocs/gw_japan/html/products/product.html:27
/local/www/htdocs/gw_japan/html/autohandler:43
/local/www/htdocs/gw_japan/html/syshandler:4
raw error






























Can't use an undefined value as an ARRAY reference at /local/www/htdocs/gw_japan/html/products/product.html line 27.


Trace begun at /usr/lib/perl5/site_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 /local/www/htdocs/gw_japan/html/products/product.html line 27.^J') called at /local/www/htdocs/gw_japan/html/products/product.html line 27
HTML::Mason::Commands::__ANON__('prod', 'TC7200-11j') called at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x9e2a230)', 'prod', 'TC7200-11j') called at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 1256
eval {...} at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 1246
HTML::Mason::Request::comp(undef, undef, undef, 'prod', 'TC7200-11j') called at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 915
HTML::Mason::Request::call_next('HTML::Mason::Request::ApacheHandler=HASH(0x9d23ba8)') called at /local/www/htdocs/gw_japan/html/autohandler line 43
HTML::Mason::Commands::__ANON__('prod', 'TC7200-11j') called at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x9e2aecc)', 'prod', 'TC7200-11j') called at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 1256
eval {...} at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 1246
HTML::Mason::Request::comp(undef, undef, undef, 'prod', 'TC7200-11j') called at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 915
HTML::Mason::Request::call_next('HTML::Mason::Request::ApacheHandler=HASH(0x9d23ba8)') called at /local/www/htdocs/gw_japan/html/syshandler line 4
HTML::Mason::Commands::__ANON__('prod', 'TC7200-11j') called at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x9e33250)', 'prod', 'TC7200-11j') called at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 1251
eval {...} at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 1246
HTML::Mason::Request::comp(undef, undef, undef, 'prod', 'TC7200-11j') called at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 460
eval {...} at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 460
eval {...} at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 412
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0x9d23ba8)') called at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/ApacheHandler.pm line 168
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x9d23ba8)') called at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/ApacheHandler.pm line 826
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x9c64054)', 'Apache=SCALAR(0x9d25b58)') called at /usr/local/apache/conf/handler.pl line 23
HTML::Mason::handler('Apache=SCALAR(0x9d25b58)') called at /dev/null line 0
eval {...} at /dev/null line 0