Perl mit Javascript (Perlscript)

Question

Ich bin für Perl CGI mit Javascript versuchen. Es ist schwierig für mich.

Versuche:

if ($lqcgi->param('sel_cl')){ 
     $selected_action = $lqcgi->param('sel_cl'); 
     print "<TR><script> document.write("<button type=\"button\" id=\"delete\">Delete</button>")</script>$line $ssh_command_flow User: $ENV{ REMOTE_USER }</TR>\n"; 
    } 

Ich weiß nicht, ob das richtig oder falsch ist. Bitte hilf mir. Vielen Dank.

Answer 1

Es ist schwer zu wissen, was Ihr Problem ist, da Sie tatsächlich keine Frage gestellt haben. Aber ich möchte nur darauf hinweisen, dass Sie eine Zeichenfolge mit doppelten Anführungszeichen haben, die doppelte Anführungszeichen enthält. Und nicht alle von ihnen sind korrekt entkommen.

Perl verfügt über den Operator qq(...), der die Erstellung von doppelten Anführungszeichen mit doppelten Anführungszeichen vereinfacht.

if ($lqcgi->param('sel_cl')){ 
    $selected_action = $lqcgi->param('sel_cl'); 
    print qq(<TR><script> document.write("<button type=\\"button\\" id=\\"delete\\">Delete</button>")</script>$line $ssh_command_flow User: $ENV{ REMOTE_USER }</TR>\n); 
} 

Update: Sie müssen auch die "\" s verdoppeln, so dass sie bis zum Javascript übergeben bekommen.