Hallo!
Ich muss einen Datensatz aus einer Textarea auf seine richtige ZUsammenstellung überprüfen.
Es egtj dabei um die Seiten-Einträge für mein CMS in einem  Flatfile.
Die einzelnen Datensätze haben die Form:
nr \t keyword \t titel \t meta-keywords \t meta-desc \t meta-page-topic \t datei(Pfad)
Dachte ich kann das so überprüfen, aber es klappt nicht, muss mal noch suchen :)

Zuerst splitte ich die einzelnen Datensätze, die ja immer in einer Zeile stehen auf und dann überprüfe ich.
(Die | sind im HTML-Formular als Trennzeichen angegeben, weil sich Tabstops in einem Formular nur sehr schlecht als Trennzeichen eignen...)
Kann das sein, dass bei dem Split schon was daneben geht?
So dass der Zeilenumbruch dem folgenden Datensatz zugeordnet wird oder so?
mfg pktm
EDIT: schon fast peinliche Typos\n\n

<!--EDIT|pktm|1072726679-->

wenn Du split() verwendest, verschwindet das Trennzeichen.
Probier Deine RegEx mal ohne das \n dafür ein $

Aha.
Habe mal \n durch $ ersetzt, jecoh ohne Erfolg.
Am Zeilenumbruch der Textarea kann es auch nicht liegen.
1. habe ich den auf "hard" gestellt, also so dass nur vom Benutzer wirklich umgebrochen werden kann und
2. habe ich die Textarea so riesig gemacht, dass der Datensatz auf jeden Fall reinpasst (sieht zwar scheiße aus, sollte aber eine gewisse Sicherheit bringen).
mfg pktm

Du kannst doch erst nach \n splitten danach wieder nach \t. scalar @values sagt Dir dann wie viele Felder mit mit \t getrennt waren.


In Deinem regulären Ausdruck [\w* ] ist * kein Wiederholungsfaktor, sondern es ist durch die [] eine Zeichenklasse mit dem Inhalt \w, * und Leerzeichen, es hätte vielleicht [\w ]* heißen sollen.

Mit der Zeile
$zeile =~ s/\|/\t/g;
machst Du | gleichwertig zu \t.

Dann kannst Du aber auch gleich
my @values = split /[\t|]/, $zeile;
oder
my @values = split /\t|\|/, $zeile;
schreiben.
Willst Du auch noch Leerzeichen links und rechts eben dem Seperator \t oder | zulassen, geht dann auch:
my @values = split / *[\t|] */, $zeile;\n\n

<!--EDIT|steffenw|1072786878-->

> foreach my $zeile ( split/ /, $rec_db ) {
Das geht nicht.
Die verschiedenen Datensätze sind durch \n voneinander getrennt.
Wenn ich nach Leerzeichen splitten würde bekäme ich irgendwelche willkürlichen Schnipsel raus, da Leerzeichen fast in allen Abschnitten eines Datensatzes vorkommen können, nur nicht da, wo Trennzeichen stehen.

Die Datensätze wurden aus einer Datei Zeilenweise ausgelesen, in ein Textarea-Feld geschrieben damit man sie verändern kann und über dieses wieder verschickt.
Folglich ist in $query->{db} ( use Vars; my $cghi = CGI->new(); my $query = $cgi->vars(); ) ein String, der diue ganzen Zeilen, incl. \n der Textarea enthält.

Aber das mit dem Hash wäre vielleicht einen Versuch wert.
mfg pktm

[Ausdruck gelöscht] Forum!!!,
man kann hier nicht mal
 Backslash n
im Perlcode schreiben, das wird einfach nicht dargestellt, sondern umgewandelt. Ich habe nämlich nicht
 Slash, Leerzeichen und Slash
geschrieben, sondern
 Slash, Backslash, n und Slash.
Ich hoffe, das bringt mal einer in Ordnung, Fluch, Fluch, Fluch, ... .\n\n

<!--EDIT|steffenw|1072786990-->

@steffenw

Danke für die Meldung. Jedoch kann man sich auch ohne Fekalausdrücke aufregen, IMHO!
Ich leite es an das Boardteam weiter. Kann sein, dass es nicht korrigiert wird, weil die ganze Community eh bald auf das selbstgeschriebene Forum umgestellt wird.

geändert!!!

[quote=esskar,29.12.2003, 22:50]geändert!!![/quote]
im Perl-Tag?

PS: "Drei Ausrufezeichen", fuhr er fort und schüttelte den Kopf. "Sicheres Zeichen für einen kranken Geist." (Terry Pratchett in "Eric")

[quote=Relais,02.01.2004, 23:45][quote=esskar,29.12.2003, 22:50]geändert!!![/quote]
im Perl-Tag?[/quote]
Nee, nee, er hat meinen Perl-Tag in einen Code-Tag geändert, weil dort die Interpretierung von \n in das binäre Zeichen dafür nicht erfolgt. Ich fand das Perl-Tag zwar optisch ansprechender, aber was soll's, ich finde mich damit ab und bin guter Hoffnung, daß das neue Forum besser wird.\n\n

<!--EDIT|steffenw|1073139823-->