или html или Perl

[Yaroslav]

тут наверное надо знание чего то третего, так как понять в чем ошибка не могу, посмотрите, может кто то сможет разобраться.
Вопрос в следующем:
есть 2 саба генерирующие формы
sub msg {
$str=$FORM{\'str\'};
$topik=$FORM{\'str\'};
open (MSG,$file);
@msg=;
close(MSG);
&htmlhead;
print "\\n";
print "\\n";
foreach (@msg) { ($sp,$ot,$tema,$name,$data,$text)=split(/`/,$msg[$str]); $str++;
 if ($sp eq "0") { if ($t eq "stop") { last; }
   print "";
   $t=stop; }
 if ($sp eq "-") {
   print ""; }
 if ($sp eq "") { last; }
}
print "";
print "";
print "";
print "

| Список сообщений | Новая тема |

От: $name $data ";    print "$tema $text

От: $name $data ";    print "$text

Имя "; print " Сообщение: \\n"; print "  \\n"; } результат - http://urp.la4.net/cgi-bin/forum/forum.cgi?action=msg&str=0 и sub start { &htmlhead; open (MSG,$file); @msg=; close(MSG); print "\\n"; print " | Новая тема | \\n"; print " \\n"; print "\\n"; print "\\n"; print "\\n";    foreach (@msg) { ($sp,$ot,$tema,$name,$data,$text)=split(/`/);       if ($sp eq "0") {       print "\\n";       print "\\n"; }    $str++; } print " Тема Автор Ответов $tema $name $ot \\n"; } итог - http://urp.la4.net/cgi-bin/forum/forum.cgi вопрос чисто непонятный, почему в первом варианте сверху до таблици такое растояние? Никогда не бойся делать то, что ты не умеешь. Помни, ковчег был построен любителем. Профессионалы построили \"Титаник\". Макс vir magni ingenii Глобальный модератор Ветеран Сообщений: 3534 +0/-0 2 или html или Perl для начала вставь теги .... First learn computer science and all the theory. Next develop a programming style. Then forget all that and just hack. ( George Carrette ) Yaroslav Фанат форума Старожил Сообщений: 323 +0/-0 0 или html или Perl да уж.... век живи - век учись.... вот она print "

Имя "; Никогда не бойся делать то, что ты не умеешь. Помни, ковчег был построен любителем. Профессионалы построили \"Титаник\". Alone Фанат форума Постоялец Сообщений: 182 +0/-0 0 или html или Perl [OFF] небольшое предложение по уменьшению кол-ва print можно писать так: print " Сообщение: \\n"; или например так(тогда можно использовать "): print qq[ Сообщение: ]; [/OFF] Yaroslav Фанат форума Старожил Сообщений: 323 +0/-0 0 или html или Perl Alone: можно писать так: print " Сообщение: \\n"; вроде я так и делал Никогда не бойся делать то, что ты не умеешь. Помни, ковчег был построен любителем. Профессионалы построили \"Титаник\". ReDrum Заглянувший Новичок Сообщений: 5 +0/-0 0 или html или Perl Yaroslav: вроде я так и делал Немного не так = можно еще Код: [Выделить] use CGI; my $q  = CGI->new(); print $q->br(),       \'Сообщение\',       $q->br(),       $q->textarea(), ....etc Печать Страницы: [1]   Вверх « предыдущая тема следующая тема » Forum Webscript.Ru » Программирование » Perl » или html или Perl Перейти в: => Perl  Sitemap 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28  SMF 2.0.19 | SMF © 2016, Simple Machines XHTML RSS Мобильная версия Страница сгенерирована за 0.206 секунд. Запросов: 16.

[Макс]

для начала вставь теги ....

[Yaroslav]

да уж....
век живи - век учись....
вот она
print "

[Alone]

[OFF]
небольшое предложение по уменьшению кол-ва print

можно писать так:
print "
Сообщение:


\\n";

или например так(тогда можно использовать "):
print qq[
Сообщение:


];

[/OFF]

[Yaroslav]

Alone:
можно писать так:
print "
Сообщение:


\\n";

вроде я так и делал

[ReDrum]

Yaroslav:
вроде я так и делал

Немного не так =
можно еще

Код: [Выделить]


use CGI;
my $q  = CGI->new();
print $q->br(),
      \'Сообщение\',
      $q->br(),
      $q->textarea(), ....etc