Alle Personen

clearlist(); filemask('^.*\.html.de'); ireaddir('/personen'); sort_by_metafield("~sortname"); $count = 1; my $abt = ""; my $fkt = ""; $bs = "0"; print "

\n"; print "

\n"; foreach my $file (@FILELIST) { my $siteactive = $FILE_META_INFO{$file}->getValues('siteactive'); my $name = $FILE_META_INFO{$file}->getValues('name'); my $vorname = $FILE_META_INFO{$file}->getValues('vorname'); my $akadtitel = $FILE_META_INFO{$file}->getValues('akadtitel'); my $email = $FILE_META_INFO{$file}->getValues('email'); my $kontakturl = $FILE_META_INFO{$file}->getValues('kontakturl'); my $beschr = $FILE_META_INFO{$file}->getValues('beschr'); my $vorstand = $FILE_META_INFO{$file}->getValues('vorstand'); my $ersatz = $FILE_META_INFO{$file}->getValues('ersatz'); my $mandat = $FILE_META_INFO{$file}->getValues('mandat'); my $soundboarding = $FILE_META_INFO{$file}->getValues('soundboarding'); my $infrastruktur = $FILE_META_INFO{$file}->getValues('infrastuktur'); if ($siteactive ne "1") { print "

\n"; print "

"; if ($akadtitel ne "") { print "$akadtitel "; } if ($vorname ne "") { print "$vorname "; } if ($name ne "") { print "$name"; } print "

\n"; print "$beschr\n"; if ($email ne "") { print "eMail\n"; } if ($kontakturl ne "") { print "Kontakt\n"; } print "

\n"; print "

\n"; print "
\n"; } } print "

\n"; print "

\n";