2016-03-22 1 views
-1

Je suis à essayer pour Perl CGI avec Javascript. C'est difficile pour moi.Perl avec Javascript (Perlscript)

Essayez:

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"; 
    } 

Je ne sais pas si c'est exact ou faux. Pls m'aide. Je vous remercie.

+2

Impossible de dire avec ce que vous nous avez donné. Nous avons besoin de plus de détails sur ce que vous faites et ce que vous essayez d'accomplir. – Sobrique

+4

Il est également utile de poser une question. :) – simbabque

+0

Ok. Exemple: 'if ($ lqcgi-> param ('sel_cl')) { \t \t \t $ selected_action = $ lqcgi-> param ('sel_cl'); \t \t \t print " ligne $ $ ssh_command_flow utilisateur: $ ENV {REMOTE_USER} \ n"; \t \t \t print " \ n"; \t \t} ' – Markus

Répondre

2

Il est difficile de savoir quel est votre problème car vous n'avez pas posé de question. Mais je ferai remarquer que vous avez une chaîne entre guillemets qui contient des guillemets. Et tous ne sont pas échappés correctement.

Perl dispose de l'opérateur qq(...) qui facilite la production de chaînes entre guillemets contenant des guillemets.

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); 
} 

Mise à jour: Vous devez également doubler les s « \ » de sorte qu'ils sont transmis par le Javascript.

+1

Les caractères '' \ '' ne seront-ils pas traités comme des caractères d'échappement Perl lorsqu'ils sont destinés à être des caractères d'échappement JavaScript? – Quentin

+0

Absolument. Fixé maintenant Merci de l'avoir signalé. –