Perl+HTML+JQuery

07.06.2007 от

ROM

Обратил внимание на “фенечку”:
Скрипт на перле, внутри html, в html вызовы jquery. Получаем что-то вроде

my $body = "<html><head>
   <meta http-equiv=\"Content-Type\" 
     content=\"text/html; charset=koi8-r\">
   <script src=\"../html/jquery.js\" language=\"JavaScript\"
      type=\"text/javascript\"></script>
   <script language=\"JavaScript\">
function sayto(s)
 {
   $('input[@name=chatbarText]').
</script></meta></head>
</html>

И получаем косячок в виде $( т.к. это системная переменная perl. Чтобы обойти это достаточно добавить знак “" перед “$(“, например:

my $body = "<html><head><meta http-equiv=\"Content-Type\" 
   content=\"text/html; charset=koi8-r\">
<script src=\"../html/jquery.js\" language=\"JavaScript\"
   type=\"text/javascript\"></script>
<script language=\"JavaScript\">
 function sayto(s)
 {
   \$('input[@name=chatbarText]').
</script></meta></head></html>

Будьте внимательны