URL: https://www.opennet.me/cgi-bin/openforum/vsluhboard.cgi
Форум: vsluhforumID9
Нить номер: 5668
[ Назад ]
Исходное сообщение
"Программирование в перл, Подскажите плиз"
Отправлено Hostik , 27-Авг-06 22:18 
Доброго времени суток, след. трабла - нужно из перлового скрипта сделать так чтобы страничка прокручивалась через определенное время, загрузилась, секунд например 30 ждем, потом начинается прокрутка вниз страницы (она вся на экран не помещается), потом внизу страницы секунд снова 30 ждем и назад, и заново..
знаю как сделать на java, но при попытке вставить в Перл ничего не происходит, то бишь -

    <HTML>    <HEAD>
</SCRIPT>    <script language=JavaScript>
    <!--
    i=0;flag=0;start_stop=1;
    function my_scroll()
             {
              if(start_stop==1)
                {

                 window.scroll(1,i*10);
                 if(flag==0) i++;
                 if(flag==1) i--;
                 if(i>20) {i=20;flag=1;i=0}
                 if(i<0) {i=0;flag=0;}

                }
              setTimeout("my_scroll()",900);
             }
    // -->
    </script>
    </HEAD>    <BODY onLoad=my_scroll()>
Бла-бла-бла
    </BODY>    </HTML>

Так пашет, а если писать это через скрипт, то бишь -

print "    <HTML>    <HEAD>";
print "</SCRIPT>    <script language=JavaScript>";
print "    <!-- ";
и тп .....то ничего не проиходит... подскажите плиз... срочно надо сделать(((

Содержание
Сообщения в этом обсуждении
"Программирование в перл, Подскажите плиз"
Отправлено phpcoder , 28-Авг-06 06:49 
Видимо в коде на JavaScript есть какие-то символы, которы будучи распечатаны в print посчитались специальными и преобразовались. Вам нужно их экранировать. Как вариант можно использовать конструкцию "текст здесь".
"Программирование в перл, Подскажите плиз"
Отправлено mail , 28-Авг-06 07:19 
>Доброго времени суток, след. трабла - нужно из перлового скрипта сделать так
>чтобы страничка прокручивалась через определенное время, загрузилась, секунд например 30 ждем,
>потом начинается прокрутка вниз страницы (она вся на экран не помещается),
>потом внизу страницы секунд снова 30 ждем и назад, и заново..
>
>знаю как сделать на java, но при попытке вставить в Перл ничего
>не происходит, то бишь -
>
>    <HTML>    <HEAD>
></SCRIPT>    <script language=JavaScript>
> <!--
> i=0;flag=0;start_stop=1;
> function my_scroll()
>          {
>           if(start_stop==1)
>
>            
> {
>
>            
>  window.scroll(1,i*10);
>            
>  if(flag==0) i++;
>            
>  if(flag==1) i--;
>                 if(i>20) {i=20;flag=1;i=0}
>            
>  if(i<0) {i=0;flag=0;}
>
>            
> }
>           setTimeout("my_scroll()",900);
>
>          }
>    // -->
>    </script>
>    </HEAD>    <BODY onLoad=my_scroll()>
>Бла-бла-бла
>    </BODY>    </HTML>
>
>Так пашет, а если писать это через скрипт, то бишь -
>
>print "    <HTML>    <HEAD>";
>print "</SCRIPT>    <script language=JavaScript>";
>print " <!-- ";
>и тп .....то ничего не проиходит... подскажите плиз... срочно надо сделать(((

к примеру вот так из моего куска:

print <<EOF;
Content-type: text/html

<?xml version="1.0" encoding="utf-8"?>
<!DOCTYPE html
        PUBLIC "-//W3C//DTD XHML 1.0 Transitional//EN"
         "http://www.w3c.org/TR/xhtml1/DTD/xhtml1-transitional.dtd&quo...
<html xmlns='http://www.w3c.org/1999/xhtml' lang='ru-RU' xml:lang='ru-RU'>
<head>
    <title>DNS Administrator</title>
<script>
function enableTextField(var1){
  switch (var1) {
    case 'var_host':
        document.getElementById('txt_hostname').setAttribute('disabled', 'disabled');
        document.getElementById('txt_ip').removeAttribute('disabled');
        document.getElementById('box_ptr').removeAttribute('disabled');
        break;
    case 'var_alias':
        document.getElementById('txt_ip').setAttribute('disabled', 'disabled');
        document.getElementById('box_ptr').setAttribute('disabled', 'disabled');
        document.getElementById('txt_hostname').removeAttribute('disabled');
        break;
  }
}
</script>
</head>
<body>
EOF