ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / HTML, JavaScript, VBScript, CSS [игнор отключен] [закрыт для гостей] / Помогите прикрутить стиль CSS к коду на Perl
5 сообщений из 5, страница 1 из 1
Помогите прикрутить стиль CSS к коду на Perl
    #36003933
scorpion_2004
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
scorpion_2004
Участник
Здравствуйте! Помогите, пожалуйста, прикрутить оформление CSS к таблице, которая генерится при работе скрипта на Perl.

Сам скрипт (mysql1.cgi):

#!/usr/bin/perl

use strict;
use DBI;
use CGI::Carp qw(fatalsToBrowser);

print "Content-type: text/html\n\n";

my $dsn = "DBI:mysql:database=perl_mysql;host=localhost;port=3306";
my $dbh = DBI->connect($dsn, 'root', '');
my $sth = $dbh->prepare("SELECT * FROM users");
$sth->execute();

print ' <html>
<head>
</head>

<body>

<table border="1">
<tr>
<th>Pole1</th>
<th>Pole2</th>
<th>Pole3</th>
<tr>
';
while (my $ref = $sth->fetchrow_hashref())
{
print "<td> $ref->{'id_kod'} </td>
<td> $ref->{'fastname'} </td>
<td> $ref->{'lastname'}\n </td>
<tr>
";
}

print '
</table>
</body>
</html>

';
$sth->finish();
$dbh->disconnect();
Сам CSS (table.css):

/*
Plain old table styles
written by Chris Heilmann http://wait-till-i.com
*/
table,td,th{
border:1px solid #000;
border-collapse:collapse;
margin:0;
padding:0;
}
td,th{
padding:.2em .5em;
vertical-align:top;
font-weight:normal;
}
thead th{
text-transform:uppercase;
background:#666;
color:#fff;
}
tbody td{
background:#ccc;
}
tbody th{
background:#999;
}
tbody tr.odd td{
background:#eee;
}
tbody tr.odd th{
background:#ccc;
}
caption{
text-align:left;
font-size:140%;
text-transform:uppercase;
letter-spacing:-1px;
}
table th a:link{
color:#030;
}
table th a:visited{
color:#003;
}
table td a:link{
color:#369;
}
table td a:visited{
color:#000;
}
table a:hover{
text-decoration:none;
}
table a:active{
color:#000;
}

Заранее благодарю
...
Рейтинг: 0 / 0
24.05.2009, 13:42
| Ответить | Цитировать | Написать  
Помогите прикрутить стиль CSS к коду на Perl
    #36003945
vkle
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vkle
Участник
Стандартно прописать линк к файлу css или воткнуть стиль прямо в код страницы чем не устраивает?
Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
24.05.2009, 14:06
| Ответить | Цитировать | Написать  
Помогите прикрутить стиль CSS к коду на Perl
    #36003947
scorpion_2004
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
scorpion_2004
Участник
Что то типа этого??

<head>
<link rel="stylesheet" href="table.css" type="text/css" media="screen" />
</head>
...
Рейтинг: 0 / 0
24.05.2009, 14:10
| Ответить | Цитировать | Написать  
Помогите прикрутить стиль CSS к коду на Perl
    #36003949
Фотография ZeroHold
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ZeroHold
Участник
scorpion_2004,

media в данной строчке по моему не причем.
видимо где то так. и кэшироваться будет лучше.
Код: plaintext
<link rel="stylesheet" type="text/css"  href="table.css" />
...
Рейтинг: 0 / 0
24.05.2009, 14:14
| Ответить | Цитировать | Написать  
Помогите прикрутить стиль CSS к коду на Perl
    #36004168
scorpion_2004
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
scorpion_2004
Участник
Благодарю!
...
Рейтинг: 0 / 0
24.05.2009, 19:42
| Ответить | Цитировать | Написать  
5 сообщений из 5, страница 1 из 1
Форумы / HTML, JavaScript, VBScript, CSS [игнор отключен] [закрыт для гостей] / Помогите прикрутить стиль CSS к коду на Perl
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=22&msg=36004168&tid=1454796]:
 0ms
get settings:
 10ms
get forum list:
 21ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 167ms
get topic data:
 13ms
get forum data:
 4ms
get page messages:
 63ms
get tp. blocked users:
 1ms
others: 208ms
total:  493ms
созд. / загр.: 493ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]