...

...

Bin am perlscript basteln komme aber nicht so recht weiter. Mit diesem Befehl läuft das script wunderbar.

print "<u>$field:</u> $Form{$field}<p>\n";

Sobald ich aber ein in inputfeld als ausgabe möchte läuft das skript nicht mehr. (interner server error)

print "<u>$field:</u><input type="text" name="$field" value="$Form{$field}" size=10 maxlength=100><p>\n";

Eine Möglichkeit: print "<u>$field:</u><p>\n";

Mit \ Anführungszeichen 'entwerten'.

genau so Perfekt Danke

Noch ein Tipp: print qq{<u>$field:</u><input type="text" name="$field" value="$Form{$field}" size=10 maxlength=100><p>\n} Manchmal mag man weder maskierte Hochkommata noch mehrzeilige EOT-Konstrukte... ;) Gruß Frank

On Wed, 03 Jul 2002 at 09:19 (+0200), Volker Kroll wrote:

On Wed, 2002-07-03 at 06:44, Lucas Kissling wrote:

...

print "<u>$field:</u><input type="text" name="$field" value="$Form{$field}" size=10 maxlength=100><p>\n";

Habe schon etliche Versuche mit diversen spielarten hinter mir alles ohne Erfolg.

Mach es Dir bei solchen Aufgaben doch einfacher:

print <

<u>$field:</u><input type="text" name="$field" value="$Form{$field}" size=10 maxlength=100><p> EOT

Nicht ganz richtig. Richtig wäre print <

On Wed, 03 Jul 2002 at 18:30 (+0200), Christoph Maurer wrote:

Am Mit, 03 Jul 2002 schrieb Bernhard Walle:

...

On Wed, 03 Jul 2002 at 09:19 (+0200), Volker Kroll wrote:

...

On Wed, 2002-07-03 at 06:44, Lucas Kissling wrote:

...

print "<u>$field:</u><input type="text" name="$field" value="$Form{$field}" size=10 maxlength=100><p>\n";

Habe schon etliche Versuche mit diversen spielarten hinter mir alles ohne Erfolg.

Mach es Dir bei solchen Aufgaben doch einfacher:

print <

<u>$field:</u><input type="text" name="$field" value="$Form{$field}" size=10 maxlength=100><p> EOT

Nicht ganz richtig. Richtig wäre

print <

EOT? EOF?

*grummel* Natürlich entweder 2x EOT oder 2x EOF. Ich habe mich halt beim abschießenden EOT/EOF verschrieben, weil ich normalerweise immer EOF verwende. Gruß, Bernhard -- "Dieselben Naturkräfte, die uns ermöglichen, zu den Sternen zu fliegen, versetzen uns auch in die Lage, unseren Stern zu vernichten." -- Wernher von Braun

On Wed, 03 Jul 2002 at 18:43 (+0200), Volker Kroll wrote:

On Wed, 2002-07-03 at 18:05, Bernhard Walle wrote:

...

On Wed, 03 Jul 2002 at 09:19 (+0200), Volker Kroll wrote:

...

Mach es Dir bei solchen Aufgaben doch einfacher:

print <

<u>$field:</u><input type="text" name="$field" value="$Form{$field}" size=10 maxlength=100><p> EOT

Nicht ganz richtig. Richtig wäre

print <

Wichtig ist der Strichpunkt nach dem 'EOT'.

Äääh, meines Erachtens funktioniert das so. (Den Schnipsel hatte ich sogar ausprobiert.

Nein. =================== #!/usr/bin/perl print < syntax error at test.pl line 6, near "print" Execution of test.pl aborted due to compilation errors Wenn ich nach dem ersten EOT ein ";" einfüge, funktioniert es.

Meinst Du jetzt ein Semikolon nach dem letzten EOT (welches Du als EOF geschrieben hattest oder das erste? Wenn das erste: Siehe meine Aussage davor ;-)

Welche? Ich kann keine diesbezügliche finden. Gruß, Bernhard -- "Demokratie heißt, sich in die eigenen Angelegenheiten einmischen." -- Max Frisch

On Wed, 03 Jul 2002 at 19:15 (+0200), Dennis Stosberg wrote:

Am 03.07.2002 um 19:02 schrieb Bernhard Walle:

...

Nein.

=================== #!/usr/bin/perl print <

print "Noch was" ===================

=> syntax error at test.pl line 6, near "print" Execution of test.pl aborted due to compilation errors

Wenn ich nach dem ersten EOT ein ";" einfüge, funktioniert es.

Oder, wenn das EOT die letzte Zeile des Skriptes ist. Dort liegt der Unterschied. Die letzte Zeile eines Perl-Skriptes (oder einer Klammerebene) braucht kein abschließendes Semi- kolon.

Deshalb habe ich ja in meinem ursprünglichen Posting folgendes geschrieben: ,---- | Natürlich funktioniert es, wenn dieser Ausdruck der letzte ist, also | kein abschließendes ';' notwendig ist. Aber davon kann man nicht | ausgehen. `---- Gruß, Bernhard -- ..Unix, MS-DOS, and Windows NT (also known as the Good, the Bad, and the Ugly). -- Matt Welsh

On Wed, 2002-07-03 at 19:02, Bernhard Walle wrote:

On Wed, 03 Jul 2002 at 18:43 (+0200), Volker Kroll wrote:

...

On Wed, 2002-07-03 at 18:05, Bernhard Walle wrote:

...

On Wed, 03 Jul 2002 at 09:19 (+0200), Volker Kroll wrote:

...

print <

<u>$field:</u><input type="text" name="$field" value="$Form{$field}" size=10 maxlength=100><p> EOT

Nicht ganz richtig. Richtig wäre

print <

Wichtig ist der Strichpunkt nach dem 'EOT'.

Äääh, meines Erachtens funktioniert das so. (Den Schnipsel hatte ich sogar ausprobiert.

Nein.

=================== #!/usr/bin/perl print <

print "Noch was" ===================

=> syntax error at test.pl line 6, near "print" Execution of test.pl aborted due to compilation errors

Wenn ich nach dem ersten EOT ein ";" einfüge, funktioniert es.

Da hast Du Recht, bei meinem Test war danach kein Aufruf mehr, deshalb funktionierte es. Wenn ich solche Dinge benutze schreibe ich es immer als: #!/usr/bin/perl print <

...

Meinst Du jetzt ein Semikolon nach dem letzten EOT (welches Du als EOF geschrieben hattest oder das erste? Wenn das erste: Siehe meine Aussage davor ;-)

Welche? Ich kann keine diesbezügliche finden.

Die, das es funktioniert. V. -- Volker Kroll 4mino AG Chief System Developer Chausseestr. 52 b volker.kroll@4mino.de D-10115 Berlin Tel.: +49-30-2888490-0 Fax.: +49-30-2888490-99