информационная безопасность
без паники и всерьез
 подробно о проектеRambler's Top100 		Портрет посетителяСетевые кракеры и правда о деле Левина
BugTraq.Ru
 Русский BugTraq
 Анализ криптографических сетевых... 
 Модель надежности двухузлового... 
 Специальные марковские модели надежности... 
 Microsoft Authenticator прекращает... 
 Очередное исследование 19 миллиардов... 
 Оптимизация ввода-вывода как инструмент... 
главная обзор RSN блог библиотека закон бред форум dnet о проекте
bugtraq.ru / форум / programming
Имя Пароль
если вы видите этот текст, отключите в настройках форума использование JavaScript
ФОРУМ
все доски
FAQ
IRC
новые сообщения
site updates
guestbook
beginners
sysadmin
programming
operating systems
theory
web building
software
hardware
networking
law
hacking
gadgets
job
dnet
humor
miscellaneous
scrap
регистрация





Легенда:
  новое сообщение
  закрытая нитка
  новое сообщение
  в закрытой нитке
  старое сообщение
А вот на Perl тебе еще 20.06.02 17:54  Число просмотров: 1101
Автор: Petruxa Статус: Незарегистрированный пользователь
<"чистая" ссылка>
#!/usr/bin/perl
$+;
print "Content-type: text/html\n\n";
open(MYF, "<bd.txt") or die "Can not open file: $!";
@all=<MYF>;
close(MYF);
foreach $line(@all){
($num,$title,$author,$size,@dermo)=split(/::/,$line);
print<<"EOF";
<tr>
<td width="6%" bgcolor=#2D6B90>1</td>
<td width="66%" bgcolor=#2D6B90>:: $title
::</td>
<td width="16%" bgcolor=#2D6B90>:: $author ::
</td>
<td width="12%" bgcolor=#2D6B90>:: $size
::</td>
</tr>
EOF
}
<programming>
небольшая БД на php 17.06.02 13:01  
Автор: super_lamer Статус: Незарегистрированный пользователь
<"чистая" ссылка>
Кто-нибудь может просвятить меня как на php сделать так
чтобы скрипт построчно считывал инфу из файла bd.txt например такого содержимого
bd.txt:
1::Название::Автор::Размер
2::Название::Автор::Размер

и выводил ее в на экран например так:

<tr>
<td width="6%" bgcolor=#2D6B90>1</td>
<td width="66%" bgcolor=#2D6B90>:: Название ::</td>
<td width="16%" bgcolor=#2D6B90>:: Автор :: </td>
<td width="12%" bgcolor=#2D6B90>:: Размер ::</td>
</tr>
А вот на Perl тебе еще 20.06.02 17:54  
Автор: Petruxa Статус: Незарегистрированный пользователь
<"чистая" ссылка>
#!/usr/bin/perl
$+;
print "Content-type: text/html\n\n";
open(MYF, "<bd.txt") or die "Can not open file: $!";
@all=<MYF>;
close(MYF);
foreach $line(@all){
($num,$title,$author,$size,@dermo)=split(/::/,$line);
print<<"EOF";
<tr>
<td width="6%" bgcolor=#2D6B90>1</td>
<td width="66%" bgcolor=#2D6B90>:: $title
::</td>
<td width="16%" bgcolor=#2D6B90>:: $author ::
</td>
<td width="12%" bgcolor=#2D6B90>:: $size
::</td>
</tr>
EOF
}
[CGI] красиво сказано - "БД"... 18.06.02 12:43  
Автор: paganoid Статус: Member
<"чистая" ссылка> 
	$list = @file("bd.txt");
	if (!$list)  die ("Файл кривой");

	$count = count($list);
	for ($i = 0 ; $i <$count; $i++){
		$line = explode("::",$list[$i]);
		echo '<tr>';
		echo '<td width="6%" bgcolor=#2D6B90>' . $line[0] . '</td>';
		echo '<td width="66%" bgcolor=#2D6B90>' . $line[1] . '</td>';
		echo '<td width="16%" bgcolor=#2D6B90>' . $line[2] . '</td>';
		echo '<td width="12%" bgcolor=#2D6B90>' . $line[3] . '</td>';
		echo '</tr>';
	}

---
1




Rambler's Top100
Рейтинг@Mail.ru


  Copyright © 2001-2025 Dmitry Leonov   Page build time: 0 s   Design: Vadim Derkach