Opened by toldap at 2010-04-06 17:07
Hi, herzlichen Dank für Deine Hilfe.
Das Problem besteht leider immer noch...
Sobald das TESTWORT1 gefunden wird ändert ja meine Ausgabe.
Das funktioniert ja wie es soll. Nun, sobald die Ausgabe geändert hat,
soll die Datei geändert werden, d.h. das TESTWORT1 soll einfach in der Datei gelöscht werden (Im Script oder auch extern z.B. mit 'echo 0 > $DATEI'), sodass wiederum die Ausgabe "TESTWORT1 notfound" kommt und das Spiel wieder von vorne anfangen kann...
Ich habe es wie folgt versucht;
das will irgendwie nicht wirklich...
Siehst Du eventuell das Problem?
Danke nochmals
Last edited: 2010-04-07 22:56:24 +0200 (CEST)
Das Problem besteht leider immer noch...
Sobald das TESTWORT1 gefunden wird ändert ja meine Ausgabe.
Das funktioniert ja wie es soll. Nun, sobald die Ausgabe geändert hat,
soll die Datei geändert werden, d.h. das TESTWORT1 soll einfach in der Datei gelöscht werden (Im Script oder auch extern z.B. mit 'echo 0 > $DATEI'), sodass wiederum die Ausgabe "TESTWORT1 notfound" kommt und das Spiel wieder von vorne anfangen kann...
Ich habe es wie folgt versucht;
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
#!/usr/bin/perl
my $IN;
open ($IN,'</test.txt') ;
while (<$IN>){
if (/TESTWORT1/ .. /\-\-\-/) {
print_log "TESTWORT1 found";
system 'echo 0 > /test.txt';
seek $IN, 0, SEEK_SET;
}
else {
print_log "TESTWORT1 notfound";
}
}
das will irgendwie nicht wirklich...
Siehst Du eventuell das Problem?
Danke nochmals
Last edited: 2010-04-07 22:56:24 +0200 (CEST)