webtist::meta.pm
Modulbeschreibung webtist::meta.pm
Version 1.07
Generiert MetaTags fuer DHTML Seiten
Marc Hanschur, Space4Data / WEBTIST [NOSPAMmarc@hanschur.de]
Aenderungsliste im PerlModul
das Modul webtist wird benoetigt
Aufruf
use webtist::meta;
$webtist::meta = new webtist::meta();
Konstruktor
Meta angaben im HTML Header werden dynamisch erzeugt
in der web.cfg kann mit dem Index METATMPL eine Metadatei mit
Verzeichnisangabe angeben werden. Wenn in der Webconfig kein Eintrag
in dieser Form existiert wird das Standart Meta File geöffnet (mein.cfg)
mit der Angabe STDMETATMPL.
Weiter definitionen in der web.cfg
METATMPL => Verzeichnis/Datei für das Meta Template
METAKEYW => Verzeichnis/Datei wo die Keywörter untereinander erfasst werden
METADESC => Verzeichnis/Datei in der ein Text hinterlegt werden kann wo die Seite beschreibt
METATYPE => Verzeichnis/Datei in der der Homepage Type hinterlegt wird
METAAUDI => Verzeichnsi/Datei in der die Besuchergrupper der Hompage hinterlegt wird
wenn die Dateien nicht/falsch/gar nicht angeben werden wird dies durch eine Fehlerausgabe
in der Rückgabe ersichtlich
die Werte sind in Form von eine CSV Liste in der web.cfg zu erfassen
Die Beschreibung der web.cfg Dateien erfolgt im Modul webtist
Aufruf
&metatags($domain,$robot,$language)
Beispiel
my $meta = $webtist::meta->metatags($ENV{'HTTP_HOST'},'index, follow','de');
Parameter
$domain => z.B. www.xy.de diese wird wie folgt erweitert (http://www.xy.de/robots.txt)
$robot => angabe was ein Suchroboter tun soll :-) index, follow / nofollow .....
$language => angabe der sprache (de,gb,....)
Rueckgabewert
ist ein Skalar mit den Metatags als Inhalt
ich kann im Moment keine Warnungen erkennen
Transparent wird durch eine Remotedelegationkerbe vollendet, die unter bestimmten Umständen brechen
konnte. Wenn dieses Ihnen geschieht, informieren Sie mich bitte.
Informieren Sie mich, wenn Sie einiges finden.
Thanks to Herz Susanne for inspiration, laughs and all 'round good times;
and Linus Torvalds for all the great software.
Dieser Code ist freie Software; Sie können ihn neuverteilen und/oder ihn unter den gleichen
Bezeichnungen wie Perl selbst ändern.
Dieses ist freie Software. Wenn es bricht, besitzen Sie beide Teile.
Hey! The above document had some coding errors, which are explained below:
Non-ASCII character seen before =encoding in 'eingefügt'. Assuming ISO8859-1