linux-l: Mehrfache Rout-Rekursion iher Nachricht. 4
ncb-spool at omega.berlinet.de
ncb-spool at omega.berlinet.de
Mi Okt 24 15:31:50 CEST 2001
-------------------------------------------------------------------------------
----- NCBMail Spool --------- Meldung über Routpfad-Rekursion -----------------
-------------------------------------------------------------------------------
Bei der Zustellung ihrer Nachricht sind 4 Rekursionen aufgetreten.
Der Systembetreiber wird versuchen, Ihre Mail, soweit es möglich ist,
weiterzuleiten.
---[ Nachrichteninfo ]---------------------------------------------------------
PM-Empfaenger : ROBOTNIK at omega.berlinet.de
Brett-Empfaenger : None or no valid area-EMP
Absender : olaf_rad at gmx.de (Olaf Radicke)
Betreff : linux-l: zwei Fragen zu Perl-DBM
Routweg : omega.berlinet.de!tbx.berlinet.de!omega.berlinet.de!tbx.berlinet.de!omega.berlinet.de!tbx.berlinet.de!omega.berlinet.de!tbx.berlinet.de!omega.berlinet.de!tbx.berlinet.de!omega.berlinet.de!tbx.berlinet.de!genius.berlinet.de!mxnx.berlinetz.de!abraxas.berlinet.de!abraxas.berlinet.de!gnu.in-berlin.de!gnu.in-berlin.de!gnu.in-berlin.de
Message-ID : 20011020150633.A505 at kiste
Erstellungsdatum : 20.10.2001 15:06:33
Länge : 1161
---[ Orginalnachricht ]--------------------------------------------------------
EMP: ROBOTNIK at omega.berlinet.de
U-Received: from mxnx.berlinetz.de(really [62.8.206.6]) by genius.berlinet.de via smtpd with esmtpid <m15vzCi-000RW0C at genius.berlinet.de>for <ROBOTNIK at omega.berlinet.de>; Tue, 23 Oct 2001 12:54:40 +0200 (CEST)(Smail-3.2 1996-Jul-4 #1)
U-Received: from abraxas.berlinet.de(really [62.8.206.8]) by mxnx.berlinetz.de via smtpd with smtp id <m15vz96-0019ORC at mxnx.berlinetz.de> for <ROBOTNIK at omega.berlinet.de>; Tue, 23 Oct 2001 12:50:56 +0200 (CEST) (Smail-3.2.0.111 2000-Feb-17 #3)
U-Received: from localhost (localhost [127.0.0.1]) by abraxas.berlinet.de (Postfix on SuSE Linux 7.2 (i386)) with ESMTP id 425C4E5A87 for <ROBOTNIK at omega.berlinet.de>; Tue, 23 Oct 2001 11:56:32 +0200 (MEST)
U-Received: from gnu.in-berlin.de (gnu.in-berlin.de [192.109.42.4]) by abraxas.berlinet.de (Postfix on SuSE Linux 7.2 (i386)) with ESMTP id 61735E5C6A for <ROBOTNIK at omega.berlinet.de>; Tue, 23 Oct 2001 11:24:01 +0200 (MEST)
U-Received: from localhost (daemon at localhost) by gnu.in-berlin.de (8.10.1/8.10.1) with SMTP id f9KDAtm05393; Sat, 20 Oct 2001 15:10:55 +0200 (CEST) (envelope-from owner-linux-l at mlists.in-berlin.de)
U-X-Envelope-From: owner-linux-l at mlists.in-berlin.de
U-Received: by gnu.in-berlin.de (bulk_mailer v1.11); Sat, 20 Oct 2001 15:10:32 +0200
U-Received: (from majordom at localhost) by gnu.in-berlin.de (8.10.1/8.10.1) id f9KD6nI05140 for mlists-in-berlin-de-outgoing-linux-l; Sat, 20 Oct 2001 15:06:49 +0200 (CEST) (envelope-from owner-linux-l at mlists.in-berlin.de)
U-Date: Sat, 20 Oct 2001 15:06:33 +0000
EDA: 20011020150633W+0:00
ABS: olaf_rad at gmx.de (Olaf Radicke)
U-To: linux-l at mlists.in-berlin.de
BET: linux-l: zwei Fragen zu Perl-DBM
MID: 20011020150633.A505 at kiste
CHARSET: ISO1
U-Content-Disposition: inline
MAILER: Mutt
ANTWORT-AN: linux-l at mlists.in-berlin.de
U-X-Virus-Scanned: by Abraxas BerliNet
ROT: tbx.berlinet.de!omega.berlinet.de!tbx.berlinet.de!omega.berlinet.de!tbx.berlinet.de!omega.berlinet.de!tbx.berlinet.de!omega.berlinet.de!tbx.berlinet.de!omega.berlinet.de!tbx.berlinet.de!genius.berlinet.de!mxnx.berlinetz.de!abraxas.berlinet.de!abraxas.berlinet.de!gnu.in-berlin.de!gnu.in-berlin.de!gnu.in-berlin.de
GATE: RFC1036/822 UU tbx.berlinet.de [DUUCP BETA vom 25.09.2000]
LEN: 1161
VIA: 20011023133117S+1 at omega.berlinet.de
VIA: 20011023173129S+1 at omega.berlinet.de
VIA: 20011023202131S+1 at omega.berlinet.de
VIA: 20011023220131S+1 at omega.berlinet.de
VIA: 20011024074633S+1 at omega.berlinet.de
Hi!
Ich wollte ein Programm schreiben das ein Schlnssel --/Wehrte-Paar
von der Eingabe einliest, nberprnft ob "ende" eingegeben wurde,
um das Programm abzubrechen und anderen Falls, das Schlnssel-/
Wehrte-Paar in eine DBM zu schreiben und wider von vorne an zu fangen.
Mein erstes Problem ist (wie sollte es anders sein) das es nicht
lSuft. Irgendwas stimmt mit <STDIN> in der 27. Zeile nicht.
Und das andere, in den Bnchern die ich hier habe, wird nicht gesagt
wie ich den DB-Hash fnr das Modul strict qualifiziere.
Hier das worum es sich dreht:
#! /usr /bin/perl -w
use AnyDBM_File;
#use strict;
#my %BLISS-DB;
#my $datei;
#my $wort;
#$bloedsinn = 0;
dbmopen (%BLISSDB, "blis-db", 0644) || die "Kann DBM ./bliss-db nicht ÷ffnen";
while (){
print "Geben sie bitte den Dateinammen des Bliss-Symbols ein\n";
$datei = <STDIN>;
chomp($datei);
if ($datei eq "ende"){
print "Oh, schon Feieraben!?"
}
last;
print "Geben sie bitte den Namen des Bliss-Symbols ein\n";
$wort = <STDIN>;
chomp ($wort);
$BLISSDB{"$datei"} = "$wort" ;
}
print "$datei . $wort \n"
Mehr Informationen über die Mailingliste linux-l