Модераторы: korob2001, ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Управление таблицами в CGI.pm 
:(
    Опции темы
korob2001
Дата 25.8.2003, 00:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 2871
Регистрация: 29.12.2002

Репутация: 13
Всего: 61



Всем доброго времени суток!
Вот, сталкнулся с такой проблемой. Необходимо создать такую таблицу, состоящую из одной строки и двух ячеек.

Код

<html>
<head>
<title>Simple</title>
</head>
<body>
<form action='cgi-bin/script.pl' method='post'>
<table width='400' border='1'>
 <tr>    
  <td width='100' align='right'>Name:</td>
      <td width='300' align='left'>
   <input type='text' size='10' name='namez'>
  </td>
 </tr>
 <tr>
  <td width='400' colspan='2' align='center'>
   <input type='submit' value='Send'>
  </td>
 </tr>
</table>
</form>
</body>
</html>


Необходимо сделать тоже самое но используя CGI.pm. О.К. пишу следующий код, особое внимание прошу обратить на часть программы которая выделена коментарием.

Код

#!/usr/bin/perl -w
use strict;
use CGI;
my $cgi = new CGI;
print $cgi->header( -charset => 'Windows-1251' ),
$cgi->start_html(),
 $cgi->start_form( -action => 'script.pl' ),
  $cgi->table( { -width => '400',
                 -border => '1' },
#---------------------------- Внимание :) --------------------------------------------
    $cgi->Tr( [
      $cgi->td( { -width => '100',
                  -align => 'right' },
                 ['Name:', $cgi->textfield( -size => '10',
                                            -name => 'namez') ], ),
    ] ),
#---------------------------- Вынимание :) ------------------------------------------
    $cgi->Tr( [
      $cgi->td( { -width => '400',
                  -colspan => '2',
                  -align => 'center' },
         $cgi->submit( -value => 'Send' ),
      ),
    ] ),
  ),
 $cgi->end_form(),
$cgi->end_html();


Но содержимое дух ячеек выравнивается по правому краю. Исходя из выше описанного кода HTML, видно что необходимо сделать выравнивание второй ячейки по левому краю.

Помогите плиз.
Просмотрел perldoc CGI но ничего подобного не обнаружил. Неужели Линкольн Штэйн не учел такую важную деталь, как индивидуальное управление ячейками таблиц?

Заранее благодарен,
Денис

Это сообщение отредактировал(а) korob2001 - 25.8.2003, 00:18


--------------------
"Время проходит", - привыкли говорить вы по неверному пониманию. 
"Время стоит - проходите вы".
PM MAIL WWW ICQ MSN   Вверх
HalkaR
Дата 25.8.2003, 09:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Пуфыстый назгул
****


Профиль
Группа: Экс. модератор
Сообщений: 2132
Регистрация: 8.12.2002
Где: В Москве

Репутация: нет
Всего: 42



Скорее проблема в HTML, потому что выдается ведь все правильно. А отбражается неверно.
PM MAIL   Вверх
korob2001
Дата 26.8.2003, 00:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 2871
Регистрация: 29.12.2002

Репутация: 13
Всего: 61



Проблема в том, что приведённый ранее код генерирует HTML код, где в двух ячейках указаны значения <td align='right'>.
Но каким образом изменить во второй ячейке значение атрибута align='right' на align='left', при этом значение атрибута align в первой ячейке, должно оставаться не изменным?

Это сообщение отредактировал(а) korob2001 - 26.8.2003, 00:37


--------------------
"Время проходит", - привыкли говорить вы по неверному пониманию. 
"Время стоит - проходите вы".
PM MAIL WWW ICQ MSN   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl: CGI программирование"
korob2001
sharq
  • В этом разделе обсуждаются вопросы относящиеся только к CGI программированию
  • Если ваш вопрос не относится к системному или CGI программированию, задавайте его в общем разделе
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", качать здесь


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: разработка для Web | Следующая тема »


 




[ Время генерации скрипта: 0.0556 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.