--- /dev/null
+#include <lt2k.style>
+
+<page title="LinuxTag 2000 - Listen">
+
+<headline Listen>
+
+
+<h3><font face="Helvetica,Arial">Referenten</font></h3>
+
+<pre>
+<?
+
+ $referent["Elke Wilkeit"] = "wilkeit@aol.com";
+ $referent["Georg C.F. Greve"] = "greve@gnu.org";
+ $referent["Jens Finke"] = "jens@gnome.org";
+ $referent["Martin Garlichs"] = "mg@giant.north.de";
+ $referent["Michael Tepperis"] = "MOhe@pdv-online.de";
+ $referent["Peter Ganten"] = "peter@ganten.org";
+ $referent["Robert Depenbrock"] = "rd@linuxtag.de";
+ $referent["Robert Möckel"] = "robert.moeckel@innominate.de";
+ $referent["Stefan Koerner"] = "ripclaw@rocklinux.org";
+ $referent["Stefan Westerfeld"] = "stefan@space.twc.de";
+ $referent["Tom Schier"] = "schier@Media-Service-Group.com";
+ $referent["Torsten Neumann"] = "torsten@imke.infodrom.ffis.de";
+ $referent["Werner Heuser"] = "wehe@snafu.de";
+ $referent["Wolfgang Reinfeldt"] = "info@a-fair.de";
+
+ for (reset ($referent); ($ref = key ($referent)); next ($referent)) {
+ printf (" %s <%s>,\n", $ref, $referent[$ref]);
+ }
+
+?>
+</pre>
+
+<h3><font face="Helvetica,Arial">Nicht-Kommerzielle Aussteller</font></h3>
+
+<pre>
+<?
+ $dbh = pg_pconnect ("kuolema", "5432", "<db>")
+ or die("Unable to connect to SQL server");
+
+ $query = "SELECT name,email FROM exhibitor WHERE type <> 'Sponsor' ORDER BY name";
+ $sth = pg_exec ($dbh, $query);
+
+ for ($nr=0; $nr < pg_NumRows ($sth); $nr++) {
+ $row = pg_fetch_array ($sth, $nr);
+
+ printf (" %s <%s>,\n", $row['name'], $row['email']);
+ }
+?>
+</pre>
+
+# <h3><font face="Helvetica,Arial">Kommerzielle Aussteller</font></h3>
+#
+# <pre>
+# <?
+# $dbh = pg_pconnect ("kuolema", "5432", "<db>")
+# or die("Unable to connect to SQL server");
+#
+# $query = "SELECT name,email FROM exhibitor WHERE type = 'Sponsor' AND amount > 0.0 ORDER BY name";
+# $sth = pg_exec ($dbh, $query);
+#
+# for ($nr=0; $nr < pg_NumRows ($sth); $nr++) {
+# $row = pg_fetch_array ($sth, $nr);
+#
+# printf (" %s <%s>,\n", $row['name'], $row['email']);
+# }
+# ?>
+# </pre>
+
+<h3><font face="Helvetica,Arial">Namensschilder</font></h3>
+
+<pre>
+<?
+ $dbh = pg_pconnect ("kuolema", "5432", "<db>")
+ or die("Unable to connect to SQL server");
+
+ $query = "SELECT name,email,themes,personal FROM exhibitor WHERE type <> 'Sponsor' ORDER BY name";
+ $sth = pg_exec ($dbh, $query);
+
+ for ($nr=0; $nr < pg_NumRows ($sth); $nr++) {
+ $row = pg_fetch_array ($sth, $nr);
+
+ $themes = explode (",",$row['themes']);
+ $themes = ereg_replace ("&", "\&", $themes[0]);
+
+ printf ("\badge{%s}{%s}{%s}\n", $row['name'], $row['email'], $themes);
+
+ if (strlen ($row['personal'])) {
+ $row['personal'] = ereg_replace ("\r", "", $row['personal']);
+ $personal = explode ("\n", $row['personal']);
+ for ($i=0; $i < count ($personal); $i++) {
+ $pers = explode ("<", $personal[$i]);
+ if (count ($pers) > 0) {
+ $emil = explode (">", $pers[1]);
+ $emil = $emil[0];
+ } else {
+ $emil = '';
+ }
+ printf ("\badge{%s}{%s}{%s}\n", $pers[0], $emil, $themes);
+ }
+ }
+ echo ("\n");
+ }
+?>
+</pre>
+
+
+<!-- ------------------------------------------------------------------------ -->
+
+# <font face="Helvetica,Arial">
+#
+# Telefonnummern aus dieser Liste werden <b>nicht</b> weitergegeben.
+# Das gilt insbesondere für die Handynummern.<p>
+#
+# <h3><font face="Helvetica,Arial">Orga-Team</font></h3>
+#
+# <table width=100% border=1 cellspacing=0 cellpadding=3 bgcolor=#ffffff>
+# <tr><th width=35% align=left><font face="Helvetica,Arial">Name</font></th><th width=35% align=left><font face="Helvetica,Arial">E-Mail</font></th><th width=15% align=left><font face="Helvetica,Arial">Telefon</font></th><th width=15% align=left><font face="Helvetica,Arial">Mobil</font></th></tr>
+#
+# <:
+# $bgcolor="#ffffff";
+# @list = ('Martin Schulze, joey@ffis.de, 0441/9738830, 0178/822 1036',
+# 'Martin Garlichs, mg@giant.north.de, 04486/505, 0175/2416861',
+# 'Michael Tepperis-von der Ohe, michael@linux-garage.de, 0441/9570914, 0172/4347196',
+# 'Christian Wenke, cw81@gmx.de, 0441/203465',
+# 'Florian Zumbiehl, florz@gmx.de, 0441/55259',
+# 'Joachim Janßen, jj@iqual.de',
+# );
+#
+# foreach $line (sort (@list)) {
+# @arr = split (/,\s*/, $line);
+# printf "<tr><td><font face=\"Helvetica,Arial\">%s</font></td>", $arr[0];
+# printf "<td><font color=\"%s\"><</font><font face=\"Helvetica,Arial\">%s</font><font color=\"%s\">></font></td>",
+# $bgcolor, $arr[1], $bgcolor;
+# printf "<td><font face=\"Helvetica,Arial\">%s</font></td>", $arr[2];
+# printf "<td><font color=\"%s\"> · </font><font face=\"Helvetica,Arial\">%s</font></td></tr>", $bgcolor, $arr[3];
+# }
+# :>
+#
+# </table><p>
+#
+# <h3><font face="Helvetica,Arial">Helfer</font></h3>
+#
+# <table width=100% border=1 cellspacing=0 cellpadding=3 bgcolor=#ffffff>
+# <tr><th width=35% align=left><font face="Helvetica,Arial">Name</font></th><th width=35% align=left><font face="Helvetica,Arial">E-Mail</font></th><th width=15% align=left><font face="Helvetica,Arial">Telefon</font></th><th width=15% align=left><font face="Helvetica,Arial">Mobil</font></th></tr>
+#
+# <:
+# $bgcolor="#ffffff";
+# @list = ('Andre von Deetzen, andre@webserv.de',
+# 'Dennis Giebel, dennis-linux@gmx.net',
+# 'Björn Schmidt, lhimdul@gmx.de, 04481/8826',
+# );
+#
+# foreach $line (sort (@list)) {
+# @arr = split (/,\s*/, $line);
+# printf "<tr><td><font face=\"Helvetica,Arial\">%s</font></td>", $arr[0];
+# printf "<td><font color=\"%s\"><</font><font face=\"Helvetica,Arial\">%s</font><font color=\"%s\">></font></td>",
+# $bgcolor, $arr[1], $bgcolor;
+# printf "<td><font face=\"Helvetica,Arial\">%s</font></td>", $arr[2];
+# printf "<td><font color=\"%s\"> · </font><font face=\"Helvetica,Arial\">%s</font></td></tr>", $bgcolor, $arr[3];
+# }
+# :>
+#
+# </table>
+
+</font>
+
+</page>
+
+# Local variables:
+# mode: text
+# mode: auto-fill
+# mode: iso-accents
+# end: