System error

error:  Can't use string ("13") as an ARRAY ref while "strict refs" in use at /usr/lib/perl5/vendor_perl/5.8.5/Date/Format.pm line 88.
context: 
... 
84: 
85:  $tzname = sprintf("%+05d",$tzname)
86:  unless($tzname =~ /\D/);
87: 
88:  $epoch = timegm(@{$time}[0..5]);
89: 
90:  @$me = gmtime($epoch + tz_offset($tzname) - tz_offset());
91:  }
92:  else
... 
code stack:  /usr/lib/perl5/vendor_perl/5.8.5/Date/Format.pm:88
/usr/lib/perl5/vendor_perl/5.8.5/Date/Format.pm:24
/proj/Mason/euromoney/shared/footer.comp:10
/proj/Mason/euromoney/index.html:34
raw error






























Can't use string ("13") as an ARRAY ref while "strict refs" in use at /usr/lib/perl5/vendor_perl/5.8.5/Date/Format.pm line 88.


Trace begun at /usr/lib/perl5/vendor_perl/5.8.5/HTML/Mason/Exceptions.pm line 129
HTML::Mason::Exceptions::rethrow_exception('Can\'t use string ("13") as an ARRAY ref while "strict refs" in use at /usr/lib/perl5/vendor_perl/5.8.5/Date/Format.pm line 88.^J') called at /usr/lib/perl5/vendor_perl/5.8.5/Date/Format.pm line 88
Date::Format::Generic::strftime('Date::Format::Generic', '%Y', 13, 41, 6, 9, 8, 110, 4, 251, 1) called at /usr/lib/perl5/vendor_perl/5.8.5/Date/Format.pm line 24
Date::Format::strftime('%Y', 13, 41, 6, 9, 8, 110, 4, 251, 1) called at /proj/Mason/euromoney/shared/footer.comp line 10
HTML::Mason::Commands::__ANON__ at /usr/lib/perl5/vendor_perl/5.8.5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x94dd998)') called at /usr/lib/perl5/vendor_perl/5.8.5/HTML/Mason/Request.pm line 1251
eval {...} at /usr/lib/perl5/vendor_perl/5.8.5/HTML/Mason/Request.pm line 1245
HTML::Mason::Request::comp(undef, undef) called at /proj/Mason/euromoney/index.html line 34
HTML::Mason::Commands::__ANON__('art', 'EmailAlert') called at /usr/lib/perl5/vendor_perl/5.8.5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x93d8264)', 'art', 'EmailAlert') called at /usr/lib/perl5/vendor_perl/5.8.5/HTML/Mason/Request.pm line 1246
eval {...} at /usr/lib/perl5/vendor_perl/5.8.5/HTML/Mason/Request.pm line 1245
HTML::Mason::Request::comp(undef, undef, undef, 'art', 'EmailAlert') called at /usr/lib/perl5/vendor_perl/5.8.5/HTML/Mason/Request.pm line 459
eval {...} at /usr/lib/perl5/vendor_perl/5.8.5/HTML/Mason/Request.pm line 459
eval {...} at /usr/lib/perl5/vendor_perl/5.8.5/HTML/Mason/Request.pm line 411
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0x94e43c4)') called at /usr/lib/perl5/vendor_perl/5.8.5/HTML/Mason/ApacheHandler.pm line 168
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x94e43c4)') called at /usr/lib/perl5/vendor_perl/5.8.5/HTML/Mason/ApacheHandler.pm line 826
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x93226c8)', 'Apache2::RequestRec=SCALAR(0x95c6704)') called at (eval 42) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0x95c6704)') called at -e line 0
eval {...} at -e line 0