[Comm] Re: web, cgi, shell, login & password

Чт Мар 31 15:10:36 MSD 2005

Здравствуйте, Denis G. Samsonenko.

Вы писали 31 марта 2005 г., 15:34:53:

> Поскольку новости буду добавлять только я, а не кто угодно, то у меня и
> встал ранее озвученный вопрос по авторизации. Просто мне хотелось 
> сделать всё это как можно проще, без привлечения большого количества
> скриптов и всяких баз данных.
напиши на Perl быстро и понятно:
news.pl

#!/usr/bin/perl

print "Content-type: text/html\n\n";
print "<html>\n<title>news.pl</title>\n<body>\n";
open (TXTFILE, "</usr/www/txt/news.txt") or die "error";
@lines = <TXTFILE>;
close(TXTFILE);
@lines =reverse @lines;
foreach my $line (@lines) {
my ($time,$text) = split(/\|\|/, $line);
print "<DIV align=\"center\">&nbsp; ".$time."</DIV>\n<DIV align=\"center\">&nbsp; ".$text."</DIV>\n<br>";
}
print "</body>\n</html>";
вот и все
содержание файла news.txt
22 Мая 2004||  - Информационное наполнение сайта||
22 Мая 2004||  - Информационное наполнение сайта||
22 Мая 2004||  - Информационное наполнение сайта||
дальше продолжать? и про админскую часть могу написать

-- 
С уважением,
 Бурдин А.Н.