--- register/prgsrc/register.cgi 2002/11/04 05:02:13 1.13 +++ register/prgsrc/register.cgi 2002/12/25 21:36:01 1.15 @@ -20,11 +20,11 @@ Boris Veytsman =head1 DATE -$Date: 2002/11/04 05:02:13 $ +$Date: 2002/12/25 21:36:01 $ =head1 REVISION -$Revision: 1.13 $ +$Revision: 1.15 $ =cut @@ -45,7 +45,7 @@ my ($SENDMAIL) = "mail"; my $TO = 'borisv@lk.net, igra@gorlovka.net, erudit@mail.od.ua'; my $FROM = 'borisv@lk.net'; -my $date='$Date: 2002/11/04 05:02:13 $'; +my $date='$Date: 2002/12/25 21:36:01 $'; $date =~ s/[^ ]* ([^ ]*) .*/$1/; @@ -189,10 +189,7 @@ END $sth->finish; print "
";
- print "Всего клубов: $count
\n";
- print "Эту страничку посмотрели ";
- print `/home/piataev/public_html/cgi-bin/counter.sh /znatoki/cgi-bin/register.cgi`;
- print " раз(а)