Mit Perl einen Link in Javascript ausgeben

[Alexander]

Hallo @all,

ich möchte via PERL einen Link in Javascript ausgeben:

PERL
...
print "<script>document.write('<a href="linkpfad');";
print "<script>document.write('?parameter=' + wert);";
print "<script>document.write(' ">Link</a> ');";
...
/PERL

Perl/JS kommt aber mit dem " in der Syntax des Print-Befehls nicht zurecht. Welche Möglichkeiten gibt es? Kann man in PERL auf Variablen von Javascript zugreifen?

Viele Grüße
Alexander

[Z.N.S.]

abend,

print "<script>document.write('<a href="linkpfad');";

----------------------------------^ --------^ --------^ -^

Perl/JS kommt aber mit dem " in der Syntax des Print-Befehls nicht zurecht.

das liegt nicht an perl.

Welche Möglichkeiten gibt es? Kann man in PERL auf Variablen von Javascript
zugreifen?

im oben aufgeführten code wird der linkpfad zwischen ' und " gepackt.zudem
brauchst du nicht alles zu escapen..

mfg,
(tanz das)
Z.N.S.

[Alexander]

im oben aufgeführten code wird der linkpfad zwischen ' und " gepackt.zudem
brauchst du nicht alles zu escapen..

Sorry, leider erschliesst sich mir Deine Antwort nicht ganz :-(

[Z.N.S.]

abend,

ich meine sowas wie..
<?
echo
'<script>'.
'document.write("<a href="http://www.selfhtml.org">link</a>")'.
'</script>';
?>

mfg,
(tanz das)
Z.N.S.

[Struppi]

PERL
...
print "<script>document.write('<a href="linkpfad');";
print "<script>document.write('?parameter=' + wert);";
print "<script>document.write(' ">Link</a> ');";
...
/PERL

Deine JS Syntax ist falsch du hast lauter öffnete Skript tags und keins das schliesst?

Du kennst here-Docs?

print <<TEXT;
<script type="text/javascript">
document.write('<a href="linkpfad');
document.write('?parameter=' + wert);
document.write(' ">Link</a> ');
TEXT

prinzipiell ist es aber immer besser sowas auf einmal auszugegeben, entweder in einer Variablen gesammlt oder den Parameter verknüpfen.

print <<TEXT;

<script type="text/javascript">
document.write( '<a href="linkpfad'

• '?parameter=' + wert
• ' ">Link</a> '
  );

Das ist schneller und du kannst im zweifelsfall schnell mal ein alert einbauen.

Perl/JS kommt aber mit dem " in der Syntax des Print-Befehls nicht zurecht. Welche Möglichkeiten gibt es? Kann man in PERL auf Variablen von Javascript zugreifen?

Nein, wie sollte das denn gehen? (es sei denn man übergibt sie als CGI Parameter)

Struppi.