%PDF- %PDF-
Mini Shell

Mini Shell

Direktori : /usr/share/perl5/vendor_perl/
Upload File :
Create Path :
Current File : //usr/share/perl5/vendor_perl/stdcgi_languages.pm

package stdcgi_languages;


#use lib '/www/cgi-bin/std/lib';
#use LifeMedien::IDNA::Punycode;

### Get Language from .lifedata lang file
sub customer_lang {
	local($lang, $langfile, $vhost, $domhost);
#	$vhost = $ENV{SERVER_NAME} || $ENV{VIRTUAL_HOST};
#	$vhost =~ tr/A-Z/a-z/;
#	$vhost =~ s/\.$//;               # "." am Ende des Hostname im Aufruf zulaessig
#	$vhost =~ /([^\.]+\.[^\.]+)$/;
#	$domhost = $vhost;
#	$domhost =~ s/^[^\.]+\.//;
	#$domhost=to_puny($domhost);
	#$langfile = $ENV{'DOCUMENT_ROOT'}."www.".$domhost."/.lifedata/lang";
#	if (-e $langfile) {
#		open(LANGFILE, "<$langfile");
#		$lang = <LANGFILE>;
#		close(LANGFILE);
#		chomp($lang);
#	}
	if (!$lang || $lang eq '') {
		$lang = "de";		# "de" ist die Life Medien Default Languages
	}
	return $lang;
}

### Get Language from Browser settings
sub guest_language {
        my $lang;
        my @valid_langs = ('de','en','pl');
#        if ($ENV{"HTTP_ACCEPT_LANGUAGE"}) {
#                $lang = $ENV{"HTTP_ACCEPT_LANGUAGE"};
#                $lang = substr($lang,0,2);
#        } else {
                $lang = "de";
#        }
        my $valid = 0;
        foreach my $key (@valid_langs) {
                if ($lang eq $key){
                        $valid = 1;
                }
        }
        if ($valid ne 1) {
                $lang = "de";
        }
        return $lang;
}


### Tage
sub days ($) {
	$lang = shift;
	if ($lang eq "de") {
		@days   = ('Sonntag','Montag','Dienstag','Mittwoch','Donnerstag','Freitag','Samstag');
        } elsif ($lang eq "en") {
        	@days   = ('Sunday','Monday','Tuesday','Wednesday','Thursday','Friday','Saturday');
       	} elsif ($lang eq "pl") {
       		@days   = ('Niedziela','Poniedzia&#322;ek','Wtorek','&#346;roda','Czwartek','Pi&#261;tek','Sobota');
       	}
       	return @days;
}

sub daysascii ($) {
	$lang = shift;
	if ($lang eq "de") {
		@days   = ('Sonntag','Montag','Dienstag','Mittwoch','Donnerstag','Freitag','Samstag');
        } elsif ($lang eq "en") {
        	@days   = ('Sunday','Monday','Tuesday','Wednesday','Thursday','Friday','Saturday');
       	} elsif ($lang eq "pl") {
		@days   = ('Niedziela','Poniedzia�ek','Wtorek','�roda','Czwartek','Pi�tek','Sobota');
       	}
       	return @days;
}

### Monate
sub month ($) {
	$lang = shift;
	if ($lang eq "de") {
		@months = ('Januar','Februar','M�rz','April','Mai','Juni','Juli','August','September','Oktober','November','Dezember');
        } elsif ($lang eq "en") {
        	@months = ('January','February','March','April','May','June','July','August','September','October','November','December');
       	} elsif ($lang eq "pl") {
       		@months = ('stycznia','lutego','marca','kwietnia','maja','czerwca','lipca','sierpnia','wrze&#347;nia','pa&#378;dziernika','listopada','grudnia;');
       	}
       	return @months;
}

sub monthascii ($) {
	$lang = shift;
	if ($lang eq "de") {
		@months = ('Januar','Februar','M�rz','April','Mai','Juni','Juli','August','September','Oktober','November','Dezember');
        } elsif ($lang eq "en") {
        	@months = ('January','February','March','April','May','June','July','August','September','October','November','December');
       	} elsif ($lang eq "pl") {
		@months = ('stycznia','lutego','marca','kwietnia','maja','czerwca','lipca','sierpnia','wrzesnia','pazdziernika','listopada','grudnia');
       	}
       	return @months;
}

### Texte fuer das Formail STD-CGI (mail.pl)
sub formmail_trans ($) {
	$lang = shift;
	if ($lang eq "de") {

		%texts = (
			'belowmess1'	=> 'Untenstehende Mitteilung wurde an',
			'belowmess2'	=> 'gesendet',
			'at'		=> 'am',
			'thankyou'	=> 'Vielen Dank',
			'sendok' 	=> 'Vielen Dank! Das Formular wurde abgeschickt.',
			'subject' 	=> 'Aus WWW-Formular',
			'formfrom' 	=> 'Aus WWW Formular von:',
			'wronghost1'    => 'Unzul&auml;ssiger Host',
			'wronghost2'    => 'Falscher Referrer - Zugriff verweigert',
			'wronghost3'    => 'Das von Ihnen benutze Formular liegt nicht auf unserem Server, sondern auf ',
			'wronghost4'    => '.<br> Der Zugang zum Skript wurde verweigert.<br> Beim Senden Ihrer E-Mail trat ein Fehler auf. Bitte versuchen Sie es noch einmal oder informieren Sie den',
			'emailform'     => 'E-Mail-Formular',
			'methoderr1'    => 'Fehler: Request Methode unzul&auml;ssig',
			'methoderr2'    => 'Das Formular darf nur &uuml;ber POST aufgerufen werden.<br>Beim Senden Ihrer E-Mail trat ein Fehler auf. Bitte versuchen Sie es noch einmal oder informieren Sie den',
			'wrongrcpt1'    => 'Fehler: Unzul&auml;ssiger/Kein Empf&auml;nger',
			'wrongrcpt2'    => 'Es wurde kein oder ein ung&uuml;ltiger Empf&auml;nger definiert. Ein g&uuml;ltiger Empf&auml;nger ist eine E-Mail Adresse die mit',
			'wrongrcpt3'    => 'endet.<br>Beim Senden Ihrer E-Mail trat ein Fehler auf. Bitte versuchen Sie es noch einmal oder informieren Sie den',
			'wrongcaptcha1'    => 'Fehler: Keine Sicherheitscode eingegeben',
			'wrongcaptcha2'    => 'Es wurde keine Sicherheitscode eingegeben',
			'wrongheader1'  => 'Fehler: Unzul&auml;ssige/Fehlerhafte Header Felder',
			'wrongheader2'  => 'Ein oder mehrere Header Felder enthalten einen ung&uuml;tigen Wert. Header Felder sind z.B. <tt>recipient</tt>, <tt>email</tt>, <tt>realname</tt> und <tt>subject</tt><br>Es d&uuml;rfen keine Zeilenumbr&uuml;che im HTML Quelltext innerhalb der Felder vorkommen.<br>Bitte versuchen Sie es noch einmal oder informieren Sie den',
			'uncompleted1'  => 'Fehler: Formular unvollst&auml;ndig',
			'uncompleted2'  => 'Sie haben das Formular nicht vollst&auml;ndig bzw. fehlerhaft ausgef&uuml;llt. Folgende, nicht optionale Felder fehlen bzw. sind falsch ausgef&uuml;llt:<p>',
			'uncompleted3'  => '<p>Bitte kehren Sie zum Formular zur&uuml;ck und erg&auml;nzen Sie die fehlenden Felder<p>',
			);
	} elsif ($lang eq "pl") {

		%texts = (
			'belowmess1'	=> 'Niniejsza wiadomo&#347;&#263; zosta&#322;a wys&#322;ana do',
			'belowmess2'	=> '',
			'at'		=> 'w',
			'thankyou'      => 'Dzi&#281;kuj&#281; bardzo',
                        'sendok'   	=> 'Dzi&#281;kuj&#281; bardzo! Formularz zosta&#322; wys&#322;any.',
                        'subject'       => 'Z formularza WWW',
                        'formfrom'      => 'Z formularza WWW od:',
                        'wronghost1'    => 'niedopuszczalny host',
                        'wronghost2'    => 'b&#322;&#281;dny Refferer - odmowa dost&#281;pu',
                        'wronghost3'    => 'Wywo&#322;ano formularz znajduj&#261;cy si&#281; poza naszym serwerem (',
                        'wronghost4'    => ')<br>dost&#281;p zosta&#322; zablokowany.<br> Przy wysy&#322;aniu Twojego eMaila wyst&#261;pi&#322; b&#322;&#261;d - spr&#243;buj jeszcze raz albo poinformuj',
                        'emailform'     => 'Formularz Email',
                        'methoderr1'    => 'B&#322;&#261;: Niedopuszczalna metoda zapytania',
			'methoderr2'    => 'Fomularz mo&#380;na wywo&#322;a&#263; poprzez POST.<br>Przy wysy&#322;aniu Twojego eMaila wyst&#261;pi&#322; b&#322;&#261;d - spr&#243;buj jeszcze raz albo poinformuj',
			'wrongrcpt1'    => 'B&#322;&#261;d: Niedopuszczalny adres odbiorcy / brak adresu',
			'wrongrcpt2'    => 'Zdefiniowano b&#322;&#281;dny lub &#380;aden adres orbiorcy. Poprawny adres odbiorcy musi by&#263; zako&#324;czony domen&#261;',
			'wrongrcpt3'    => '.<br> Przy wysy&#322;aniu Twojego eMaila wyst&#261;pi&#322; b&#322;&#261;d - spr&#243;buj jeszcze raz albo poinformuj',
			'wrongheader1'  => 'B&#322;&#261;d: Niedopuszczalne / b&#322;&#281;dne pola nagl&#243;wkowe',
			'wrongheader2'  => 'Jedno albo par&#281; p&#243;l nag&#322;&#243;wkowych zawiera niedozwolon&#261; warto&#347;&#263;. Polami nag&#322;&#243;wkowymi s&#261; na przyk&#322;ad:  <tt>recipient</tt>, <tt>email</tt>, <tt>realname</tt> und <tt>subject</tt><br> Pami&#281;taj, &#380;e w zakresie p&#243;l nag&#322;&#243;wkowych - w zr&#243;dle HTML - nie mo&#380;e nast&#261;pi&#263; lamanie linii.<br> Spr&#243;buj jeszcze raz albo poinformuj',
			'uncompleted1'  => 'B&#322;&#261;d: formularz niekompletny',
			'uncompleted2'  => 'Formularz nie zosta&#322; kompletnie (lub b&#322;&#281;dnie) wype&#322;niony. Nast&#281;puj&#261;ce nieopcjonalne pola nie zawieraj&#261; danych lub zosta&#322;y b&#322;&#281;dnie wype&#322;nione:<p>',
			'uncompleted3'  => '<p>Prosz&#281; powr&#243;ci&#263; do formularza i poprawi&#263; wy&#380;ej wymienione pola.<p>',
                        );
	} elsif ($lang eq "en") {
		%texts = (
			'belowmess1'    => 'Below is what you submitted to',
			'belowmess2'    => '',
			'at'            => 'on',
                        'thankyou'      => 'Thank You',
                        'sendok'        => 'Thank You For Filling Out This Form',
                        'subject'       => 'WWW Form Submission',
                        'formfrom'      => 'Sent by mail form from:',
                        'wronghost1'    => 'Bad Referrer - Access Denied',
                        'wronghost2'    => 'Bad Referrer - Access Denied',
                        'wronghost3'    => 'The form that you were trying to use is not located on our server, but on (',
                        'wronghost4'    => '). Access to the script has been denied. An error occured while trying to send your e-mail. Please try again later or contact',
			'emailform'     => 'mail form',
			'methoderr1'    => 'Error: Request Method',
			'methoderr2'    => 'The Request Method of the Form you submitted did not match either <tt>GET</tt> or <tt>POST</tt>.  Please check the form and make sure the <tt>method=</tt> statement is in upper case and matches <tt>GET</tt> or <tt>POST</tt>.<p>',
			'wrongrcpt1'    => 'Error: Bad/No Recipient',
			'wrongrcpt2'    => 'No valid recipient has been defined. Valid recipient addresses contain a local account followed by a domain name:',
			'wrongrcpt3'    => '.<br> An error occured while trying to send your e-mail. Please try again later or contact',
			'wrongheader1'  => 'Error: Bad Header Fields',
			'wrongheader2'  => 'The header fields, which include <tt>recipient</tt>, <tt>email</tt>, <tt>realname</tt> and <tt>subject</tt> were filled in with invalid values. You may not include any newline characters in these parameters. Please try again later or contact the',
			'uncompleted1'  => 'Error: Blank Fields',
			'uncompleted2'  => 'The following fields were left blank in your submission form:<p>',
			'uncompleted3'  => '<p>These fields must be filled in before you can successfully submit the form.<p>',
		);
	}
	return %texts;
}

### Texte fuer das Gaestebuch STD-CGI (gaestebuch.cgi)
sub guestbook_trans ($) {
        $lang = shift;
        if ($lang eq "de") {
                %texts = (
			'VielenDank'	=> 'Vielen Dank f&uuml;r Ihren Eintrag.',
			'Bittewarten'	=> 'Wir leiten Sie jetzt zum G&auml;stebuch zur&uuml;ck, bitte warten Sie zwei Sekunden.',
			'Weiterleitung' => 'Klicken Sie hier, wenn Sie nicht l&auml;nger warten m&ouml;chten oder Ihr Browser keine automatische Weiterleitung unterst&uuml;tzt.',
			'IhrEintrag'	=> 'Ihr Eintrag',
			'Pflichtfelder' => '&quot;Name&quot; und &quot;Kommentar&quot; sind Pflichtfelder!',
			'Und'		=> 'und',
			'Kommentar'	=> 'Kommentar',
			'Vorschau'	=> 'Vorschau',
			'Hinzufuegen'	=> 'Eintrag hinzuf&uuml;gen',
			'ZurueckzuGB'	=> 'Zur&uuml;ck zum G&auml;stebuch',
                        'Fehler1'       => 'Es ist ein Fehler aufgetreten:',
			'AlteEintraege'	=> '&Auml;ltere Eintr&auml;ge',
			'NeueEintraege'	=> 'Neuere Eintr&auml;ge',
			'ZeigeEintraege'=> 'Zeige Eintr&auml;ge',
			'Erstelltam'	=> 'erstellt am',
			'Um'		=> 'um',
			'Uhr'		=> 'Uhr',
			'NameMuss'	=> 'Das Feld &quot;Name&quot; muss ausgef&uuml;llt werden!',
			'KommentarMuss'	=> 'Das Feld &quot;Kommentar&quot; muss ausgef&uuml;llt werden!',
			'Vorschau2'	=> 'Vorschau auf den Beitrag:',
			'Name'		=> 'Name',
			'KeineEintraege'=> 'Keine Eintr&auml;ge vorhanden',
			'Title'		=> 'G&auml;stebuch',
			'Emailan'	=> 'Email an',
			'Homepagevon'	=> 'Homepage von',
			'Eintragen'	=> 'Tragen Sie sich ein!',
			'ParamFehlt'	=> 'Eingabeparameter fehlt.',
                        'Fehler2'       => 'Aufgrund eines Fehlers kann zur Zeit nicht auf f&uuml;r diese Aktion notwendige Daten zugegriffen werden. Bitte versuchen Sie zu einem sp&auml;teren Zeitpunkt noch einmal, die entsprechende Aktion durchzuf&uuml;hren.',
			'Fehler3'	=> 'Das gew&uuml;nschte G&auml;stebuch existiert nicht.',
			'Fehler4'	=> 'Fehler',
			'GBEintrag'	=> 'Gaestebucheintrag',
			'Von'		=> 'von',
			'NeuerEintrag'	=> 'Neuer Gaestebucheintrag',
			'NeuerEintragMeldung'		=> 'Es gab einen neuen Eintrag in Ihrem Gaestebuch:',
			'Zeit'		=> 'Zeit',
			'SieErreichen'	=> 'Sie erreichen Ihr Gaestebuch unter',
			'AutoEmail'	=> 'Dies ist eine automatisch erzeugte eMail, die bei jedem Eintrag in Ihr Gaestebuch verschickt wird. Zum Deaktivieren der automatischen Benachrichtigung gehen Sie in den Kundenservice-Bereich Ihrer Domain und folgen den Links Homepage >> Standard-CGIs >> Gaestebuch >> Status.',
			'CaptchaHinweis'=> 'Bitte geben Sie die Zeichen, die Sie in der nebenstehenden Grafik sehen, in das Textfeld ein. Dies ist erforderlich, um sicherzugehen, dass der Eintrag nicht durch einen automatischen Prozess erfolgt. <b>F&uuml;r die Vorschau ist das nicht erforderlich.</b>',
			'CaptchaMuss'	=> 'Das Feld f&uuml;r die grafische &Uuml;berpr&uuml;fung muss ausgef&uuml;llt werden!',
			'CaptchaFalsch'	=> 'Die Zeichenfolge, die Sie zur &Uuml;berpr&uuml;fung eingegeben haben, stimmt nicht mit der in der Grafik angezeigten Zeichenfolge &uuml;berein.',
			'Scriptname'	=> 'gaestebuch.cgi',
			'DefaultTitle'	=> 'G&auml;stebuch',
                        );
	} elsif ($lang eq "en") {
                %texts = (
			'VielenDank'	=> 'Thank you for your message.',
			'Bittewarten'	=> 'Please wait 2 seconds to be redirected to the guestbook.',
			'Weiterleitung' => 'Click here if your browser does not support redirection.',
			'IhrEintrag'	=> 'Your comment',
			'Pflichtfelder' => '&quot;Name&quot; and &quot;comment&quot; are mandatory fields!',
			'Und'		=> 'and',
			'Kommentar'	=> 'Comment',
			'Vorschau'	=> 'Preview',
			'Hinzufuegen'	=> 'Post message',
			'ZurueckzuGB'	=> 'Back to guestbook',
                        'Fehler1'       => 'An error occured',
			'AlteEintraege'	=> 'Older records',
			'NeueEintraege'	=> 'Newer records',
			'ZeigeEintraege'=> 'Show records',
			'Erstelltam'	=> 'Created at',
			'Um'		=> '',
			'Uhr'		=> '',
			'NameMuss'	=> 'Please enter a &quot;Name&quot;!',
			'KommentarMuss'	=> 'Please enter a &quot;Comment&quot;!',
			'Vorschau2'	=> 'Preview to message',
			'Name'		=> 'Name',
			'KeineEintraege'=> 'No records found',
			'Title'		=> 'Guestbook',
			'Emailan'	=> 'Mail to',
			'Homepagevon'	=> 'Homepage',
			'Eintragen'     => 'Sign my guestbook!',
			'ParamFehlt'	=> 'Missing parameter',
                        'Fehler2'       => 'Due to an error it is not possible to access required data for this action. Please try again later.',
			'Fehler3'	=> 'The requested guestbook does not exist.',
			'Fehler4'       => 'Error',
			'GBEintrag'	=> 'guestbook message',
			'Von'		=> 'from',
			'NeuerEintrag'	=> 'New guestbook message',
			'NeuerEintragMeldung'		=> 'There is a new message in your guestbook:',
			'Zeit'		=> 'Date',
			'SieErreichen'	=> 'Get to your guestbook here:',
			'AutoEmail'	=> 'This is an automatically created e-mail which is sent with every new message in your guestbook. If you want to deactivate the automatic notification, please  login to your domain administration service and follow the links Homepage >> Standard CGIs >> Guestbook >> Status.',
			'CaptchaHinweis'=> 'Please type in the following field the script code which is shown beside. This is necessary to assure that the login is not done by a program. <b>The preview is available without typing the code.</b>',
			'CaptchaMuss'	=> 'Please enter the script code.',
			'CaptchaFalsch'	=> 'The script code you typed in was incorrect.',
			'Scriptname'	=> 'guestbook.cgi',
			'DefaultTitle'	=> 'guest book',
                        );

        } elsif ($lang eq "pl") {
                %texts = (
			'VielenDank'	=> 'Dzi&#x119;kuj&#x119; za dokonanie wpisu.',
			'Bittewarten'	=> 'Za dwie sekundy zostaniesz przekierowany do Ksi&#x105;&#x17C;ki Go&#x15B;ci.',
			'Weiterleitung' => 'Kliknij tutaj, je&#x15B;li nie chcesz czeka&#x107; lub Twoja przegl&#x105;darka nie wspomaga przekierowania.',
			'IhrEintrag'	=> 'Tw&oacute;j wpis',
			'Pflichtfelder' => 'Pola &quot;Nick&quot; i &quot;Komentarz&quot; musz&#x105; by&#x107; wype&#x142;nione!',
			'Und'		=> 'i',
			'Kommentar'	=> 'Komentarz',
			'Vorschau'	=> 'Podgl&#x105;d',
			'Hinzufuegen'	=> 'Zapisz',
			'ZurueckzuGB'	=> 'Powr&oacute;t do Ksi&#x105;&#x17C;ki Go&#x15B;ci',
                        'Fehler1'       => 'Wyst&#x105;pi&#x142; b&#x142;&#x105;d',
			'AlteEintraege'	=> 'Starsze wpisy',
			'NeueEintraege'	=> 'Nowsze wpisy',
			'ZeigeEintraege'=> 'Poka&#x17C; wpisy',
			'Erstelltam'	=> 'dodane dnia',
			'Um'		=> 'o godzinie',
			'Uhr'		=> '',
			'NameMuss'	=> 'Pole Nicka musi by&#x107; wype&#x142;nione!',
			'KommentarMuss'	=> 'Pole komentarza musi by&#x107; wype&#x142;nione!',
			'Vorschau2'	=> 'Podgl&#x105;d wpisu',
			'Name'		=> 'Nick',
			'KeineEintraege'=> 'Brak wpis&oacute;w',
			'Title'		=> 'Ksi&#x105;&#x17C;ka Go&#x15B;ci',
			'Emailan'	=> 'eMail do',
			'Homepagevon'	=> 'Strona domowa',
			'Eintragen'     => 'Dokonaj wpisu!',
			'ParamFehlt'	=> 'Brak parametru wej&#x15B;ciowego',
                        'Fehler2'       => 'Z powodu b&#x142;&#x119;du nie mo&#x17C;na uzyska&#x107; dost&#x119;pu do niezb&#x119;dnych danych. Powt&oacute;rz przerwan&#x105; akcj&#x119; p&oacute;&#x17A;niej',
			'Fehler3'       => '&#x17B;&#x105;dana ksi&#x105;&#x17C;ka go&#x15B;ci nie istnieje',
			'Fehler4'	=> 'B&#x142;&#x105;d',
			'GBEintrag'	=> 'Wpis do Ksi&#x105;&#x17C;ki Go&#x15B;ci',
			'Von'		=> 'z',
			'NeuerEintrag'	=> 'Nowy wpis do Ksiegi gosci',
			'NeuerEintragMeldung'		=> 'Do Ksiegi gosci zostal dodany nowy wpis',
			'Zeit'		=> 'Czas',
			'SieErreichen'	=> 'Twoja Ksiega gosci znajduje sie pod ',
			'AutoEmail'	=> 'Automatycznie generowany E-mail po  kazdym  wpisie do Twojej Ksiegi gosci. Deaktywacji tej opcji mozna dokonac  tutaj: Serwis domen >> Moja witryna >> Standardowe CGI >> Ksiega  gosci >> Status ',
			'CaptchaHinweis'=> 'Prosimy wpisa&#263; tekst z obrazka obok do pola tekstowego. Jest to konieczne, &#380;eby zabezpieczy&#263; wpisy przed automatami sieciowymi. Do podgl&#261;du nie jest to konieczne.',
			'CaptchaMuss'	=> 'Pole z graficznym tekstem musi by&#263; wype&#322;nione.',
			'CaptchaFalsch'	=> 'Wpisany tekst nie zgadza si&#281; z tekstem podanym na obrazku.',
			'Scriptname'	=> 'guestbook.cgi',
			'DefaultTitle'	=> 'Ksi&#281;ga go&#347;ci',
                        );

        }
        return %texts;
}

### Texte fuer das Newsletter STD-CGI (newsletter.pl)
sub newsletter_trans ($) {
        $lang = shift;
        if ($lang eq "de") {
                %texts = (
			'reportsubject' => 'Sendebericht Newsletterversand',
			'nodomain'      => 'Es konnte keine Domain bestimmt werden!',
                        'novalid'       => 'Die angegebene E-Mail-Adresse ist ung&uuml;ltig!',
                        'emailaddok'    => 'Die angegebene E-Mail-Adresse wurde in den Verteiler aufgenommen!',
                        'emaildelok'    => 'Die angegebene E-Mail-Adresse wurde aus dem Verteiler gel&ouml;scht!',
                        'thankyou'      => 'Vielen Dank',
                        'emailnotfound' => 'Die angegebene E-Mail-Adresse konnte nicht gefunden werden!',
                        'subscribe'	=> 'Newsletter abonnieren',
                        'unsubscribe'	=> 'Newsletter abbestellen',
                        'error'		=> 'Es trat ein Fehler auf!',
                        'error2'	=> 'Fehler!',
                        'youremail'	=> 'Ihre E-Mail-Adresse:',
                        'newsletter'	=> 'Newsletter',
                        'Newsversand'	=> 'Der Newsletter-Versand an',
                        'Ergebnis'	=> 'Adresse(n) wurde erfolgreich eingeleitet.',
                        'Ergebnis1'	=> 'Unzustellbare E-Mails werden an Ihre Adresse',
                        'Zurueck'	=> 'zurueckgeschickt.',
                        'AnFolgenden'	=> 'An die folgenden',
                        'NichtVersendet'=> 'eMail-Adresse(n) konnte der Newsletter nicht versendet werden:',
                        'Lesefehler'	=> 'Es ist ein technischer Fehler aufgetreten. Die zustaendige Technikabteilung wurde bereits ueber diesen Fehler informiert.',
                        'EmpfaengerLeer'=> 'Es sind keine eMail-Adressen eingetragen, an die Ihr Newsletter versendet werden kann.',
                        'SubjectLeer'	=> 'Es wurde kein Betreff fuer den Newsletter angegeben.',
                        'BodyLeer'	=> 'Es wurde kein Inhaltstext fuer den Newsletter angegeben.',
                        'go'		=> 'Los',
			'Grund'		=> 'Der Newsletter konnte aus folgendem Grund nicht versendet werden:'
                        );

        } elsif ($lang eq "pl") {
                %texts = (
			'reportsubject' => "Raport wysy�ki newslettera",
                        'nodomain'      => "Nie znaleziono domeny!",
                        'novalid'	=> "Podano b&#322;&#281;dny adres eMail!",
                        'emailaddok'    => "Podany adres eMail zosta&#322; dodany do listy dystrybucyjnej!",
                        'emaildelok'    => "Podany adres eMail zosta&#322; skasowany z listy dystrybucyjnej!",
                        'thankyou'      => "Dzi&#281;kuj&#281; bardzo",
                        'emailnotfound' => "Podany adres eMail nie zosta&#322; znaleziony!",
                        'subscribe'	=> "renumerata Newslettera",
                        'unsubscribe'	=> "Rezygnacja z Newslettera",
                        'error'		=> "Wyst&#261;pi&#322; b&#322;&#261;d!",
                        'error2'	=> "B&#322;&#261;d!",
                        'youremail'	=> "Pa&#324;ski adres eMail:",
                        'newsletter'	=> "Newslettera",
                        'go'		=> "Dalej",
			'Newsversand'   => "Przesy�anie newslettera do",
                        'Ergebnis'     => "adres�w zota�o rozpocz�te.",
                        'Ergebnis1'     => "Ewentualne zwroty zostan� dostarczone na adres",
			'Zurueck'    	=> ".",
			'AnFolgenden'	=> "Do nast�puj�cych",
			'NichtVersendet'=> "adres�w nie wys�ano Newslettera:",
			'Lesefehler'	=> "Wyst�pi� b��d techniczny. Dzia� Techniczny zosta� ju� o tym b��dzie poinformowany.",
                        'EmpfaengerLeer'=> "Nie podano �adnych adres�w eMail, na kt�re mo�na wys�a� Newsletter.",
                        'SubjectLeer'	=> "Nie podano �adnego tytu�u dla Newslettera.",
                        'BodyLeer'	=> "Nie podano �adnej tre�ci dla Newslettera.",
			'Grund'         => "Newsletter nie m�g� by� dostarczony z nast�puj�cego powodu:"
                        );
        } elsif ($lang eq 'en') {
                %texts = (
			'reportsubject' => "Newsletter delivery report",
			'nodomain'      => "No domain name could be found!",
                        'novalid'       => "The given e-mail address is not valid!",
                        'emailaddok'    => "The given e-mail address has been added to the distribution list!",
                        'emaildelok'    => "The given e-mail address has been deleted from the distribution list!",
                        'thankyou'      => "Thank You",
                        'emailnotfound' => "The given e-mail address could not be found!",
                        'subscribe'	=> "subscribe to newsletter",
                        'unsubscribe'	=> "unsubscribe from newsletter",
                        'error'		=> "An error occured!",
                        'error2'	=> "Error!",
                        'youremail'	=> "Your e-mail address:",
                        'newsletter'	=> "Newsletter",
                        'Newsversand'	=> "The newsletter transmission to",
                        'Ergebnis'	=> "address(es) has been successfully initiated.",
                        'Ergebnis1'	=> "Undeliverable e-mails will be sent back to your address",
                        'Zurueck'	=> ".",
                        'AnFolgenden'	=> "The newsletter could not be sent to the following",
                        'NichtVersendet'=> "e-mail address(es):",
                        'Lesefehler'	=> "A technical error occured. The appropriate technical staff has already been notified about this error.",
                        'EmpfaengerLeer'=> "There are no e-mail addresses subscribed to your newsletter.",
                        'SubjectLeer'	=> "You did not specify a subject for your newsletter.",
                        'BodyLeer'	=> "You did not specify a content for your newsletter.",
                        'go'		=> "Go",
			'Grund'		=> "The newsletter could not be sent due to the following reason:"
                        );
	}

        return %texts;
}
1;

Zerion Mini Shell 1.0