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', 'MD7800-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(0x90da410)', 'prod', 'MD7800-11j') called at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 1262
eval {...} at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 1252
HTML::Mason::Request::comp(undef, undef, undef, 'prod', 'MD7800-11j') called at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 921
HTML::Mason::Request::call_next('HTML::Mason::Request::ApacheHandler=HASH(0x8fd50d0)') called at /local/www/htdocs/gw_japan/html/autohandler line 43
HTML::Mason::Commands::__ANON__('prod', 'MD7800-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(0x90db0b8)', 'prod', 'MD7800-11j') called at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 1262
eval {...} at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 1252
HTML::Mason::Request::comp(undef, undef, undef, 'prod', 'MD7800-11j') called at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 921
HTML::Mason::Request::call_next('HTML::Mason::Request::ApacheHandler=HASH(0x8fd50d0)') called at /local/www/htdocs/gw_japan/html/syshandler line 4
HTML::Mason::Commands::__ANON__('prod', 'MD7800-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(0x90e5314)', 'prod', 'MD7800-11j') called at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 1257
eval {...} at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 1252
HTML::Mason::Request::comp(undef, undef, undef, 'prod', 'MD7800-11j') called at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 466
eval {...} at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 466
eval {...} at /usr/lib/perl5/site_perl/5.8.8/HTML/Mason/Request.pm line 418
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0x8fd50d0)') 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(0x8fd50d0)') 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(0x8fd4c38)', 'Apache=SCALAR(0x8fd4fd4)') called at /usr/local/apache/conf/handler.pl line 23
HTML::Mason::handler('Apache=SCALAR(0x8fd4fd4)') called at /dev/null line 0
eval {...} at /dev/null line 0