You are viewing a plain text version of this content. The canonical link for it is here.
Posted to docs-cvs@perl.apache.org by st...@apache.org on 2005/07/09 09:06:20 UTC
svn commit: r209930 - /perl/modperl/docs/trunk/src/search/spider.pl
Author: stas
Date: Sat Jul 9 00:06:17 2005
New Revision: 209930
URL: http://svn.apache.org/viewcvs?rev=209930&view=rev
Log:
use a normal version number, cvs's version has now moved to svn which is a way too
big and not sequential to be useful
Modified:
perl/modperl/docs/trunk/src/search/spider.pl
Modified: perl/modperl/docs/trunk/src/search/spider.pl
URL: http://svn.apache.org/viewcvs/perl/modperl/docs/trunk/src/search/spider.pl?rev=209930&r1=209929&r2=209930&view=diff
==============================================================================
--- perl/modperl/docs/trunk/src/search/spider.pl (original)
+++ perl/modperl/docs/trunk/src/search/spider.pl Sat Jul 9 00:06:17 2005
@@ -1,8 +1,7 @@
#!/usr/local/bin/perl -w
use strict;
-
-# $Id: spider.pl,v 1.5 2002/04/30 05:37:44 moseley Exp $
+# $Id$
#
# "prog" document source for spidering web servers
#
@@ -23,7 +22,7 @@
use HTML::Tagset;
use vars '$VERSION';
-$VERSION = sprintf '%d.%02d', q$Revision: 1.5 $ =~ /: (\d+)\.(\d+)/;
+$VERSION = "1.00";
use vars '$bit';
use constant DEBUG_ERRORS => $bit = 1; # program errors
---------------------------------------------------------------------
To unsubscribe, e-mail: docs-cvs-unsubscribe@perl.apache.org
For additional commands, e-mail: docs-cvs-help@perl.apache.org