Alle Beiträge dieses Benutzers
Seite 1 von 1 Seiten: 1
Ergebnisse 1 — 10 von 10
chat - 13 Jahre
wie krieg ich es hin, dass nicht nur die neu eingetippte nachricht, sondern alle nachrichten im chat angezeigt werden? muss ich dafür zuerst die nachrichten in die datenbank speichern und dann wieder aus der db abrufen? oder geht es auch auf direktem weg?
von
ann-kathrin
-
Einführung in die Programmiersprache Perl
ich habeein problem beim schritt
"# wenn $kandidat eine Datei ist: "$verzeichnis/$kandidat" in @liste speichern".
ist mein ansatz richtig, wenn ich, um herauszufinden, ob es sich um eine datei handelt, mit einem einzigen regulären ausdruck arbeite, der beinhaltet, dass die zeichenkette mit punkt und zwei bis drei buchstaben enden muss?
oder muss für jeden dateityp ein
von
ann-kathrin
-
Einführung in die Programmiersprache Perl
use Fcntl;
while (1) {
sysopen(A,"dateia.txt",O_WRONLY|O_CREAT|O_APPEND);
sysopen(B,"dateib.txt",O_WRONLY|O_CREAT|O_APPEND);
flock A,2;
flock B,2;
print A "Text aus Programm 1\n";
print B "Text aus Programm 1\n";
if (flock A,2) {print "lock erfolgt\n";}
if (flock B,2) {print "lock erfolgt\n";}
close A;
von
ann-kathrin
-
Einführung in die Programmiersprache Perl
wenn ich die dateien A und B nacheinander öffne und nacheinander beschreibe, dann wird immer nur die datei, die oben steht, also als erstes genannt wird, beschrieben. soll das so sein oder habe ich einen fehler in mein programm eingebaut?
ich habe zuerst die dateien nacheinander geöffnet, dann für jede einen schreiblock eingebaut und dann versucht, in zwei befehlen (einen für jede datei) beide
von
ann-kathrin
-
Einführung in die Programmiersprache Perl
Wie wende ich einen regulären Ausdruck auf ein Hash an? Ich habe es am Beispiel der Substitution folgendermaßen versucht:
if ($hash{"Vorname Name"} = ~ /regulärer ausdruck/) {s/ausdruck-alt/ausdruck-neu};
Jedoch passiert da gar nichts mit dem Hash-Wert...
von
ann-kathrin
-
Einführung in die Programmiersprache Perl
ich habe es jetzt mit open und close probiert, was zum selben resultat führt: es passiert gar nichts. das programm läuft wohl, wird aber beendet, ohne dass ein ergebnis angezeigt wird.
wenn ich per STDIN selbst einige wörter eintippe, funktioniert alles, die richtigen wörter werden erkannt! ich habe das gefühl, dass der inhalt der textdatei nicht wirklich erkannt wird?!?
von
ann-kathrin
-
Einführung in die Programmiersprache Perl
meine programme funktionieren, wenn ich selbst wörter per STDIN eintippe, wenn ich jedoch die textdatei mit "<words.txt" einlese, bleibt das programm einfach stehen, es läuft nicht weiter. woran könnte das liegen?
von
ann-kathrin
-
Einführung in die Programmiersprache Perl
"Schreibt zwei Programme, das eine Liste von Zahlen einliest und zwischen jedem aufeinander folgenden Zahlenpaar a und
b alle dazwischenliegenden Zahlen...einfügt."
wenn ich $a mit $b vergleichen soll - wie komme ich an b ran? ich habe das ganze zunächst mit einer while-schleife gelöst, in der ich $a = $liste[0] und $b = $liste[1] zugewiesen habe.
wenn ich aber eine foreach-sc
von
ann-kathrin
-
Einführung in die Programmiersprache Perl
meine idee für diese aufgabe wäre, von jeder - in einer variablen gespeicherten - zahl (also $zahl1, $zahl2 und $summe) jeweils alle ziffern zu extrahieren.
ich würde die funktion entsprechend erweitern und somit jede einzelne ziffer entsprechend ihrer stelle in zahlenworte umwandeln. ist es (ohne reguläre ausdrücke) möglich, die einzelnen ziffern zu extrahieren und in einem array zu speiche
von
ann-kathrin
-
Einführung in die Programmiersprache Perl
ich bin schon bei aufgabe 2 stecken geblieben - meine until-schleife läuft immer weiter und lässt sich nicht mit "ENDE" beenden. wo ist der fehler?
do
{
$a = <STDIN>;
#...
} until ($a eq "ENDE");
von
ann-kathrin
-
Einführung in die Programmiersprache Perl