602__________________Часть V. Разработка программ и написание скриптов
$uri= $ENV('DOCUMENT_URI'};
$countfile= "count";
print "Content-type:text/htinl\n\n";
open(COUNT, "+<$countfile")II do( print "Can't open count file";
die;};-flock(COUNT, 2);
while (<COUNT>)(
chop;
($file, $count)=split(/:/, $_);
$counts{$file}=$count;
}
$counts($uri)++;
seek(COUNT, 0, 0);
foreach $file (keys %counts)(
print COUNT $file,":",$counts{$file), "\n";
flock(COUNT, 8);
close(COUNT);
print $ counts{$uri);
exit;
Рекламные плакаты
Мы уже упоминали в двух последних разделах об использовании рекламных плакатов (баннеров), таких, какие вы видели на многих популярных Web-страницах. Рекламные плакаты представляют собой небольшие вставки на странице, которые обычно используются в качестве ссылки на сайт рекламируемой компании. У такой рекламы есть одно замечательное свойство, — многие компании готовы платить значительные суммы, лишь бы их реклама присутствовала на ваших страницах.