System error

error:  Error during compilation of /product/share/bookfinder/site/help/glossary/_links.mhtml:
syntax error at /product/share/bookfinder/site/help/glossary/_links.mhtml line 59, near "else ("
Global symbol "$data" requires explicit package name at /product/share/bookfinder/site/help/glossary/_links.mhtml line 60.
syntax error at /product/share/bookfinder/site/help/glossary/_links.mhtml line 118, near "}"
Can't use global @_ in "my" at /product/share/bookfinder/site/help/glossary/_links.mhtml line 126, near "if @_ "
syntax error at /product/share/bookfinder/site/help/glossary/_links.mhtml line 173, near "}"

context: 
... 
55:  name: "Osservatorio Libri Antichi Glossario"
56:  url: http://www.osservatoriolibri.com/glossario.html
57:  END
58: 
59:  } else ($ENV{BF_SITE_URL} =~ m/bookfinder/) {
60:  $data = <<'END';
61:  ---
62:  - pairs: [[de, de]]
63:  name: "antiquariat Glossar"
64:  url: http://www.antiquariat.de/glossar.jsp
... 
114:  push @{ $resources{ $pair->[0] }->{ $pair->[1] } }, $resource;
115:  }
116:  }
117:  }
118:  }
119:  </%once>
120: 
121:  <%perl>
122:  my $user_lang = $ENV{BF_INTERFACE_LOCALE_LANG};
123: 
124:  my %lang_names;
125:  foreach my $source_lang ( sort keys %resources ) {
126:  $lang_names{$source_lang} = loc("Language_$source_lang");
127:  }
128: 
129:  foreach my $source_lang (
130:  sort {
... 
169:  % my $start_lang = $resource->{pairs}->[0]->[0];
170:  <li><a href="<% $resource->{url} |h%>"><% $resource->{name} |h %></a> <small>(<% loc("Language_$start_lang") %> &rarr; <% join('/', sort map {loc("Language_$_->[1]")} @{$resource->{pairs}}) %>)</small></li>
171:  </%def>
172: 
code stack:  /usr/local/share/perl5/HTML/Mason/Interp.pm:450
/usr/local/share/perl5/HTML/Mason/Request.pm:1127
/usr/local/share/perl5/HTML/Mason/Request.pm:1041
/usr/local/share/perl5/HTML/Mason/Request.pm:1239
/product/share/bookfinder/site/help/glossary/index.mhtml:5
raw error






























Error during compilation of /product/share/bookfinder/site/help/glossary/_links.mhtml:
syntax error at /product/share/bookfinder/site/help/glossary/_links.mhtml line 59, near "else ("
Global symbol "$data" requires explicit package name at /product/share/bookfinder/site/help/glossary/_links.mhtml line 60.
syntax error at /product/share/bookfinder/site/help/glossary/_links.mhtml line 118, near "}"
Can't use global @_ in "my" at /product/share/bookfinder/site/help/glossary/_links.mhtml line 126, near "if @_ "
syntax error at /product/share/bookfinder/site/help/glossary/_links.mhtml line 173, near "}"



Trace begun at /usr/local/share/perl5/HTML/Mason/Interp.pm line 851
HTML::Mason::Interp::_compilation_error('HTML::Mason::Interp=HASH(0x563b015614f8)', '/product/share/bookfinder/site/help/glossary/_links.mhtml', 'HTML::Mason::Exception::Compilation=HASH(0x563b0768b6c0)') called at /usr/local/share/perl5/HTML/Mason/Interp.pm line 450
HTML::Mason::Interp::load('HTML::Mason::Interp=HASH(0x563b015614f8)', '/help/glossary/_links.mhtml') called at /usr/local/share/perl5/HTML/Mason/Request.pm line 1127
HTML::Mason::Request::_fetch_comp('HTML::Mason::Request::ApacheHandler=HASH(0x563b0535fe68)', '_links.mhtml', 'HTML::Mason::Component::FileBased=HASH(0x563b0540e908)', 'SCALAR(0x563b074ee6d0)') called at /usr/local/share/perl5/HTML/Mason/Request.pm line 1041
HTML::Mason::Request::fetch_comp('HTML::Mason::Request::ApacheHandler=HASH(0x563b0535fe68)', '_links.mhtml', undef, 'SCALAR(0x563b074ee6d0)') called at /usr/local/share/perl5/HTML/Mason/Request.pm line 1239
HTML::Mason::Request::comp('HTML::Mason::Request::ApacheHandler=HASH(0x563b0535fe68)', '_links.mhtml') called at /product/share/bookfinder/site/help/glossary/index.mhtml line 5
HTML::Mason::Commands::__ANON__ at /usr/local/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x563b0540e908)') called at /usr/local/share/perl5/HTML/Mason/Request.pm line 1297
eval {...} at /usr/local/share/perl5/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, undef) called at /usr/local/share/perl5/HTML/Mason/Request.pm line 481
eval {...} at /usr/local/share/perl5/HTML/Mason/Request.pm line 481
eval {...} at /usr/local/share/perl5/HTML/Mason/Request.pm line 433
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0x563b0535fe68)') called at /usr/local/share/perl5/HTML/Mason/ApacheHandler.pm line 168
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x563b0535fe68)') called at /usr/local/share/perl5/HTML/Mason/ApacheHandler.pm line 825
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x563b014533b8)', 'Apache2::RequestRec=SCALAR(0x563b07585838)') called at (eval 173) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0x563b07585838)') called at -e line 0
eval {...} at -e line 0