

<html><body>

<p align="center"><font face="Verdana, Arial, Helvetica, sans-serif"><b>System error</b></font></p>
<table border="0" cellspacing="0" cellpadding="1">
 <tr>
  <td nowrap="nowrap" align="left" valign="top"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2"><b>error:</b>&nbsp;</font></td>
  <td align="left" valign="top"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2">Undefined subroutine &amp;WDBI::say called at /home/kulturnik/htdocs/srv/extract/index.gen line 355.<br></font></td>
 </tr>
 <tr>
  <td nowrap="nowrap" align="left" valign="top"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2"><b>context:</b>&nbsp;</font></td>
  <td align="left" valign="top" nowrap="nowrap"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2">
   <table border="0" cellpadding="0" cellspacing="0">

    <tr>
     <td nowrap="nowrap" align="left" valign="top"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2"><b>...</b>&nbsp;</font></td>
     <td align="left" valign="top" nowrap="nowrap"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2"></font></td>
    </tr>

    <tr>
     <td nowrap="nowrap" align="left" valign="top"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2"><b>351:</b>&nbsp;</font></td>
     <td align="left" valign="top" nowrap="nowrap"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2">	if(CGI::param('xml_begin')) { printf_xml(tp_apply(CGI::param('xml_begin'))); }</font></td>
    </tr>

    <tr>
     <td nowrap="nowrap" align="left" valign="top"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2"><b>352:</b>&nbsp;</font></td>
     <td align="left" valign="top" nowrap="nowrap"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2">	foreach my $item (@$items) {</font></td>
    </tr>

    <tr>
     <td nowrap="nowrap" align="left" valign="top"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2"><b>353:</b>&nbsp;</font></td>
     <td align="left" valign="top" nowrap="nowrap"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2">	  my %data;</font></td>
    </tr>

    <tr>
     <td nowrap="nowrap" align="left" valign="top"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2"><b>354:</b>&nbsp;</font></td>
     <td align="left" valign="top" nowrap="nowrap"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2">	  my %info;</font></td>
    </tr>

    <tr>
     <td nowrap="nowrap" align="left" valign="top"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2"><b>355:</b>&nbsp;</font></td>
     <td align="left" valign="top" nowrap="nowrap"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2"><font color=red>	  say('input','&lt;pre&gt;'.esc('xml',$item-&gt;toString(1)).'&lt;/pre&gt;');</font></font></td>
    </tr>

    <tr>
     <td nowrap="nowrap" align="left" valign="top"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2"><b>356:</b>&nbsp;</font></td>
     <td align="left" valign="top" nowrap="nowrap"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2">	  if(%xattr) { # if some attributes</font></td>
    </tr>

    <tr>
     <td nowrap="nowrap" align="left" valign="top"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2"><b>357:</b>&nbsp;</font></td>
     <td align="left" valign="top" nowrap="nowrap"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2">	    for my $a (sort(keys(%xattr))) {</font></td>
    </tr>

    <tr>
     <td nowrap="nowrap" align="left" valign="top"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2"><b>358:</b>&nbsp;</font></td>
     <td align="left" valign="top" nowrap="nowrap"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2">	      my $attr;</font></td>
    </tr>

    <tr>
     <td nowrap="nowrap" align="left" valign="top"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2"><b>359:</b>&nbsp;</font></td>
     <td align="left" valign="top" nowrap="nowrap"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2">	      $data{$a}=[];		</font></td>
    </tr>

    <tr>
     <td nowrap="nowrap" align="left" valign="top"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2"><b>...</b>&nbsp;</font></td>
     <td align="left" valign="top" nowrap="nowrap"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2"></font></td>
    </tr>


   </table>
  </font></td>
 </tr>
 <tr>
  <td align="left" valign="top" nowrap="nowrap"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2"><b>code stack:</b>&nbsp;</font></td>
  <td align="left" valign="top" nowrap="nowrap"><font face="Verdana, Arial, Helvetica, sans-serif" size="-2">
        /home/kulturnik/htdocs/srv/extract/index.gen:355<br>
        /home/kulturnik/htdocs/srv/extract/index.gen:255<br>
  </font></td>
 </tr>
</table>

<a href="#raw">raw error</a><br>

<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>


<a name="raw"></a>

<pre>Undefined subroutine &amp;WDBI::say called at /home/kulturnik/htdocs/srv/extract/index.gen line 355.


Trace begun at /usr/share/perl5/HTML/Mason/Exceptions.pm line 129
HTML::Mason::Exceptions::rethrow_exception('Undefined subroutine &amp;WDBI::say called at /home/kulturnik/htdocs/srv/extract/index.gen line 355.^J') called at /home/kulturnik/htdocs/srv/extract/index.gen line 355
HTML::Mason::Commands::do_action('xml') called at /home/kulturnik/htdocs/srv/extract/index.gen line 255
HTML::Mason::Commands::__ANON__('xml_item', '&lt;component&gt;&lt;Vevent&gt;^M^J&lt;summary&gt;{summary}&lt;/summary&gt;^M^J&lt;dtstart&gt;{dtstart[3]}-{dtstart[2]}-{dtstart[1]} {dtstart[4]}:{dtstart[5]}:00+01&lt;/dtstart&gt;^M^J&lt;location&gt;Klub K4, Ljubljana&lt;/location&gt;^M^J&lt;description rdf:parseType=&quot;Literal&quot;&gt;&lt;div xmlns=&quot;http://www.w3.org/1999/xhtml&quot;&gt;^M^J&lt;h3&gt;{abstract.trim}&lt;/h3&gt;^M^J&lt;p&gt;{k4:main}&lt;/p&gt;^M^J&lt;p&gt;{k4:bar}&lt;/p&gt;^M^J&lt;/div&gt;&lt;/description&gt;^M^J&lt;url rdf:resource={url.absolute}/&gt;^M^J&lt;categories&gt;ples&lt;/categories&gt;^M^J&lt;uid&gt;{dtstart.to_id}&lt;/uid&gt;^M^J&lt;/Vevent&gt;&lt;/component&gt;^M^J', 'xpath[]', 'ARRAY(0xabf7228)', 'item_xpath', '//table[@width=&quot;482&quot;]', 'xregx[]', 'ARRAY(0xa666748)', 'action', 'xml', 'url', 'http://www.klubk4.org/program_tekoci.shtm', 'xml_end', '&lt;/Vcalendar&gt;&lt;/rdf:RDF&gt;', 'xattr[]', 'ARRAY(0xa690d58)', 'xml_begin', '&lt;?xml version=&quot;1.0&quot; encoding=&quot;UTF-8&quot;?&gt;^M^J&lt;!DOCTYPE RDF [^M^J&lt;!ENTITY timestamp   &quot;http://www.w3.org/2001/XMLSchema#dateTime&quot;&gt; ^M^J&lt;!ENTITY timestamplj &quot;http://www.w3.org/2002/12/cal/tzd/Europe/Ljubljana#tz&quot;&gt; ^M^J]&gt;^M^J&lt;?xml-stylesheet type=&quot;text/xsl&quot; href=&quot;/cgp/view-rdfcal.xsl&quot;?&gt;^M^J&lt;rdf:RDF^M^J xmlns=&quot;http://www.w3.org/2002/12/cal/icaltzd#&quot;^M^J xmlns:m3c=&quot;http://www.m3c.si/xmlns/m3c/2006-06#&quot;^M^J xmlns:rdf=&quot;http://www.w3.org/1999/02/22-rdf-syntax-ns#&quot;&gt;^M^J &lt;Vcalendar rdf:about={.source_url}&gt;^M^J  &lt;prodid&gt;-//Ljudmila.org/XPath extractor//EN&lt;/prodid&gt;^M^J  &lt;version&gt;2.0&lt;/version&gt;^M^J') called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0xad39220)', 'xml_item', '&lt;component&gt;&lt;Vevent&gt;^M^J&lt;summary&gt;{summary}&lt;/summary&gt;^M^J&lt;dtstart&gt;{dtstart[3]}-{dtstart[2]}-{dtstart[1]} {dtstart[4]}:{dtstart[5]}:00+01&lt;/dtstart&gt;^M^J&lt;location&gt;Klub K4, Ljubljana&lt;/location&gt;^M^J&lt;description rdf:parseType=&quot;Literal&quot;&gt;&lt;div xmlns=&quot;http://www.w3.org/1999/xhtml&quot;&gt;^M^J&lt;h3&gt;{abstract.trim}&lt;/h3&gt;^M^J&lt;p&gt;{k4:main}&lt;/p&gt;^M^J&lt;p&gt;{k4:bar}&lt;/p&gt;^M^J&lt;/div&gt;&lt;/description&gt;^M^J&lt;url rdf:resource={url.absolute}/&gt;^M^J&lt;categories&gt;ples&lt;/categories&gt;^M^J&lt;uid&gt;{dtstart.to_id}&lt;/uid&gt;^M^J&lt;/Vevent&gt;&lt;/component&gt;^M^J', 'xpath[]', 'ARRAY(0xabf7228)', 'item_xpath', '//table[@width=&quot;482&quot;]', 'xregx[]', 'ARRAY(0xa666748)', 'action', 'xml', 'url', 'http://www.klubk4.org/program_tekoci.shtm', 'xml_end', '&lt;/Vcalendar&gt;&lt;/rdf:RDF&gt;', 'xattr[]', 'ARRAY(0xa690d58)', 'xml_begin', '&lt;?xml version=&quot;1.0&quot; encoding=&quot;UTF-8&quot;?&gt;^M^J&lt;!DOCTYPE RDF [^M^J&lt;!ENTITY timestamp   &quot;http://www.w3.org/2001/XMLSchema#dateTime&quot;&gt; ^M^J&lt;!ENTITY timestamplj &quot;http://www.w3.org/2002/12/cal/tzd/Europe/Ljubljana#tz&quot;&gt; ^M^J]&gt;^M^J&lt;?xml-stylesheet type=&quot;text/xsl&quot; href=&quot;/cgp/view-rdfcal.xsl&quot;?&gt;^M^J&lt;rdf:RDF^M^J xmlns=&quot;http://www.w3.org/2002/12/cal/icaltzd#&quot;^M^J xmlns:m3c=&quot;http://www.m3c.si/xmlns/m3c/2006-06#&quot;^M^J xmlns:rdf=&quot;http://www.w3.org/1999/02/22-rdf-syntax-ns#&quot;&gt;^M^J &lt;Vcalendar rdf:about={.source_url}&gt;^M^J  &lt;prodid&gt;-//Ljudmila.org/XPath extractor//EN&lt;/prodid&gt;^M^J  &lt;version&gt;2.0&lt;/version&gt;^M^J') called at /usr/share/perl5/HTML/Mason/Request.pm line 1297
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, undef, 'xml_item', '&lt;component&gt;&lt;Vevent&gt;^M^J&lt;summary&gt;{summary}&lt;/summary&gt;^M^J&lt;dtstart&gt;{dtstart[3]}-{dtstart[2]}-{dtstart[1]} {dtstart[4]}:{dtstart[5]}:00+01&lt;/dtstart&gt;^M^J&lt;location&gt;Klub K4, Ljubljana&lt;/location&gt;^M^J&lt;description rdf:parseType=&quot;Literal&quot;&gt;&lt;div xmlns=&quot;http://www.w3.org/1999/xhtml&quot;&gt;^M^J&lt;h3&gt;{abstract.trim}&lt;/h3&gt;^M^J&lt;p&gt;{k4:main}&lt;/p&gt;^M^J&lt;p&gt;{k4:bar}&lt;/p&gt;^M^J&lt;/div&gt;&lt;/description&gt;^M^J&lt;url rdf:resource={url.absolute}/&gt;^M^J&lt;categories&gt;ples&lt;/categories&gt;^M^J&lt;uid&gt;{dtstart.to_id}&lt;/uid&gt;^M^J&lt;/Vevent&gt;&lt;/component&gt;^M^J', 'xpath[]', 'ARRAY(0xabf7228)', 'item_xpath', '//table[@width=&quot;482&quot;]', 'xregx[]', 'ARRAY(0xa666748)', 'action', 'xml', 'url', 'http://www.klubk4.org/program_tekoci.shtm', 'xml_end', '&lt;/Vcalendar&gt;&lt;/rdf:RDF&gt;', 'xattr[]', 'ARRAY(0xa690d58)', 'xml_begin', '&lt;?xml version=&quot;1.0&quot; encoding=&quot;UTF-8&quot;?&gt;^M^J&lt;!DOCTYPE RDF [^M^J&lt;!ENTITY timestamp   &quot;http://www.w3.org/2001/XMLSchema#dateTime&quot;&gt; ^M^J&lt;!ENTITY timestamplj &quot;http://www.w3.org/2002/12/cal/tzd/Europe/Ljubljana#tz&quot;&gt; ^M^J]&gt;^M^J&lt;?xml-stylesheet type=&quot;text/xsl&quot; href=&quot;/cgp/view-rdfcal.xsl&quot;?&gt;^M^J&lt;rdf:RDF^M^J xmlns=&quot;http://www.w3.org/2002/12/cal/icaltzd#&quot;^M^J xmlns:m3c=&quot;http://www.m3c.si/xmlns/m3c/2006-06#&quot;^M^J xmlns:rdf=&quot;http://www.w3.org/1999/02/22-rdf-syntax-ns#&quot;&gt;^M^J &lt;Vcalendar rdf:about={.source_url}&gt;^M^J  &lt;prodid&gt;-//Ljudmila.org/XPath extractor//EN&lt;/prodid&gt;^M^J  &lt;version&gt;2.0&lt;/version&gt;^M^J') called at /usr/share/perl5/HTML/Mason/Request.pm line 481
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 481
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 433
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0xb9b2d98)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 165
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0xb9b2d98)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 831
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0xaa49ee0)', 'Apache2::RequestRec=SCALAR(0xa662e08)') called at (eval 33) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0xa662e08)') called at -e line 0
eval {...} at -e line 0
</pre>

</body></html>
