--- register/prgsrc/register.cgi 2003/07/16 02:08:28 1.16 +++ register/prgsrc/register.cgi 2010/03/30 02:55:52 1.19 @@ -20,11 +20,11 @@ Boris Veytsman =head1 DATE -$Date: 2003/07/16 02:08:28 $ +$Date: 2010/03/30 02:55:52 $ =head1 REVISION -$Revision: 1.16 $ +$Revision: 1.19 $ =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: 2003/07/16 02:08:28 $'; +my $date='$Date: 2010/03/30 02:55:52 $'; $date =~ s/[^ ]* ([^ ]*) .*/$1/; @@ -196,7 +196,7 @@ END