Import of ABIGAIL/Regexp-Common-2.103 from CPAN.

gitpan-cpan-distribution: Regexp-Common
gitpan-cpan-version:      2.103
gitpan-cpan-path:         ABIGAIL/Regexp-Common-2.103.tar.gz
gitpan-cpan-author:       ABIGAIL
gitpan-cpan-maturity:     released

README

@@ -1,7 +1,20 @@
 ==============================================================================
-                  Release of version 1.20 of Regexp::Common
+                  Release of version 2.103 of Regexp::Common
 ==============================================================================
 
+NOTE:  The jump to version 2.100 is there for no other reason than that
+       CPAN.pm is stupid. The entire world considers version numbers to be
+       dot separated *INTEGERS*, except CPAN, which considers them to
+       be *FLOATS*. In which universe there can be more than one dot
+       in a float is of course a mystery.
+
+       CPAN.pm just couldn't deal with the fact one of the files in the
+       distribution was of version 1.10, thinking the older 1.9 version
+       was newer.
+
+       It would be sooo tempting to start using Roman numerals as version
+       numbers.
+
 NOTE:  The jump from version 0.09 to 1.20 does not indicate a significant
        change in the API, or any other significant change. It's just that
        the version number now follows the revision number from CVS.
@@ -84,10 +97,18 @@ COPYRIGHT
 
 ==============================================================================
 
-CHANGES IN VERSION 1.30
+CHANGES IN VERSION 2.103
 
 Revision history for Perl extension Regexp::Common.
 
+2.103 Thu Jan 23 03:21:17 2003
+        - Added German and French postal codes.
+        - Fixed some bugs concerning HTTP URIs.
+        - Complete remake of t/test_uri_http, with 15k+ tests. 
+          Extended testing exposed the now fixed bugs.
+        - 87 patterns in 11 classes.
+        - 156778 tests in 30 files.
+
 1.30  Fri Jan 17 14:20:02 2003
         - Fixed a bug concerning HTTP and FTP URIs.
          (reported by Hermann-Marcus Behrens)

TODO

@@ -1,4 +1,4 @@
-$Id: TODO,v 1.3 2002/12/27 23:36:44 abigail Exp $
+$Id: TODO,v 2.100 2003/01/21 23:18:40 abigail Exp $
 
 - t/test_keep.t causes warnings under 5.005 and 5.6.
 - URIs:

lib/Regexp/Common.pm

@@ -8,7 +8,7 @@ local $^W = 1;
 use vars qw /$VERSION %RE %sub_interface/;
 
 
-($VERSION) = q $Revision: 1.30 $ =~ /([\d.]+)/;
+($VERSION) = q $Revision: 2.103 $ =~ /([\d.]+)/;
 
 use Carp;
 
@@ -700,7 +700,7 @@ Provides regexes for strings with balanced parenthesized delimiters.
 
 =item Regexp::Common::comment
 
-Provides regexes for comments of various languages (39 languages
+Provides regexes for comments of various languages (43 languages
 currently).
 
 =item Regexp::Common::delimited
@@ -810,6 +810,23 @@ project, especially: Elijah, Jarkko, Tom, Nat, Ed, and Vivek.
 =head1 HISTORY
 
   $Log: Common.pm,v $
+  Revision 2.103  2003/01/23 02:19:01  abigail
+  New release
+
+  Revision 2.102  2003/01/22 17:32:34  abigail
+  New release
+
+  Revision 2.101  2003/01/21 23:52:18  abigail
+  POD fix.
+
+  Revision 2.100  2003/01/21 23:19:40  abigail
+  The whole world understands RCS/CVS version numbers, that 1.9 is an
+  older version than 1.10. Except CPAN. Curse the idiot(s) who think
+  that version numbers are floats (in which universe do floats have
+  more than one decimal dot?).
+  Everything is bumped to version 2.100 because CPAN couldn't deal
+  with the fact one file had version 1.10.
+
   Revision 1.30  2003/01/17 13:19:04  abigail
   New release
 

lib/Regexp/Common/URI.pm

@@ -1,4 +1,4 @@
-# $Id: URI.pm,v 1.10 2003/01/17 13:17:15 abigail Exp $
+# $Id: URI.pm,v 2.100 2003/01/21 23:19:40 abigail Exp $
 
 package Regexp::Common::URI; {
 
@@ -9,7 +9,7 @@ use Regexp::Common qw /pattern clean no_defaults/;
 
 use vars qw /$VERSION/;
 
-($VERSION) = q $Revision: 1.10 $ =~ /[\d.]+/g;
+($VERSION) = q $Revision: 2.100 $ =~ /[\d.]+/g;
 
 # RFC 2396, base definitions.
 my $digit             =  '[0-9]';
@@ -46,11 +46,11 @@ my $path              =  "(?:(?:$abs_path|$rel_path)?)";
 
 my $port              =  "(?:$digit*)";
 my $IPv4address       =  "(?:$digit+[.]$digit+[.]$digit+[.]$digit+)";
-my $toplabel          =  "(?:$alphanum"."[-a-zA-Z0-9]*$alphanum|$alpha)";
-my $domainlabel       =  "(?:(?:$alphanum"."[-a-zA-Z0-9]*)$alphanum)";
+my $toplabel          =  "(?:$alpha"."[-a-zA-Z0-9]*$alphanum|$alpha)";
+my $domainlabel       =  "(?:(?:$alphanum"."[-a-zA-Z0-9]*)?$alphanum)";
 my $hostname          =  "(?:(?:$domainlabel\[.])*$toplabel\[.]?)";
 my $host              =  "(?:$hostname|$IPv4address)";
-my $hostport          =  "(?:$host(?::$port))";
+my $hostport          =  "(?:$host(?::$port)?)";
 
 my $userinfo          =  "(?:(?:[a-zA-Z0-9\\-_.!~*'();:&=+\$,]+|$escaped)*)";
 my $userinfo_no_colon =  "(?:(?:[a-zA-Z0-9\\-_.!~*'();&=+\$,]+|$escaped)*)";
@@ -516,6 +516,17 @@ Vaha-Sipila, A.: I<URLs for Telephone Calls>. April 2000.
 =head1 HISTORY
 
  $Log: URI.pm,v $
+ Revision 2.100  2003/01/21 23:19:40  abigail
+ The whole world understands RCS/CVS version numbers, that 1.9 is an
+ older version than 1.10. Except CPAN. Curse the idiot(s) who think
+ that version numbers are floats (in which universe do floats have
+ more than one decimal dot?).
+ Everything is bumped to version 2.100 because CPAN couldn't deal
+ with the fact one file had version 1.10.
+
+ Revision 1.11  2003/01/21 22:59:33  abigail
+ Fixed small errors with  and
+
  Revision 1.10  2003/01/17 13:17:15  abigail
  Fixed '$toplabel' and '$domainlabel'; they were both subexpressions
  of the form: A|AB. Which passed the tests because most tests anchor

lib/Regexp/Common/balanced.pm

@@ -4,7 +4,7 @@ use strict;
 local $^W = 1;
 
 use vars qw /$VERSION/;
-($VERSION) = q $Revision: 1.6 $ =~ /[\d.]+/g;
+($VERSION) = q $Revision: 2.100 $ =~ /[\d.]+/g;
 
 use Regexp::Common qw /pattern clean no_defaults/;
 
@@ -164,6 +164,14 @@ captures the entire expression
 =head1 HISTORY
 
  $Log: balanced.pm,v $
+ Revision 2.100  2003/01/21 23:19:40  abigail
+ The whole world understands RCS/CVS version numbers, that 1.9 is an
+ older version than 1.10. Except CPAN. Curse the idiot(s) who think
+ that version numbers are floats (in which universe do floats have
+ more than one decimal dot?).
+ Everything is bumped to version 2.100 because CPAN couldn't deal
+ with the fact one file had version 1.10.
+
  Revision 1.6  2002/08/20 15:20:48  abigail
  Documented -begin and -end
 

lib/Regexp/Common/comment.pm

@@ -382,6 +382,14 @@ Press. B<1990>. ISBN 0-19-853737-9. Ch. 10.3, pp 390-391.
 =head1 HISTORY
 
  $Log: comment.pm,v $
+ Revision 2.100  2003/01/21 23:19:40  abigail
+ The whole world understands RCS/CVS version numbers, that 1.9 is an
+ older version than 1.10. Except CPAN. Curse the idiot(s) who think
+ that version numbers are floats (in which universe do floats have
+ more than one decimal dot?).
+ Everything is bumped to version 2.100 because CPAN couldn't deal
+ with the fact one file had version 1.10.
+
  Revision 1.19  2002/11/06 13:51:34  abigail
  Minor POD changes.
 

lib/Regexp/Common/lingua.pm

@@ -8,7 +8,7 @@ use Carp;
 
 use vars qw /$VERSION/;
 
-($VERSION) = q $Revision: 1.2 $ =~ /[\d.]+/;
+($VERSION) = q $Revision: 2.100 $ =~ /[\d.]+/;
 
 pattern name    => [qw /lingua palindrome -chars=[A-Za-z]/],
         create  => sub {
@@ -99,6 +99,14 @@ The 4 digit extention (if any).
 =head1 HISTORY
 
  $Log: lingua.pm,v $
+ Revision 2.100  2003/01/21 23:19:40  abigail
+ The whole world understands RCS/CVS version numbers, that 1.9 is an
+ older version than 1.10. Except CPAN. Curse the idiot(s) who think
+ that version numbers are floats (in which universe do floats have
+ more than one decimal dot?).
+ Everything is bumped to version 2.100 because CPAN couldn't deal
+ with the fact one file had version 1.10.
+
  Revision 1.2  2003/01/01 19:11:29  abigail
  Fixed problem with having different palindrome patterns in same program
 

lib/Regexp/Common/net.pm

@@ -7,7 +7,7 @@ use Regexp::Common qw /pattern clean no_defaults/;
 
 use vars qw /$VERSION/;
 
-($VERSION) = q $Revision: 1.8 $ =~ /[\d.]+/g;
+($VERSION) = q $Revision: 2.100 $ =~ /[\d.]+/g;
 
 my %IPunit = (
     dec => q{(?k:25[0-5]|2[0-4]\d|[0-1]??\d{1,2})},
@@ -273,6 +273,14 @@ L<Regexp::Common> for a general description of how to use this interface.
 =head1 HISTORY
 
  $Log: net.pm,v $
+ Revision 2.100  2003/01/21 23:19:40  abigail
+ The whole world understands RCS/CVS version numbers, that 1.9 is an
+ older version than 1.10. Except CPAN. Curse the idiot(s) who think
+ that version numbers are floats (in which universe do floats have
+ more than one decimal dot?).
+ Everything is bumped to version 2.100 because CPAN couldn't deal
+ with the fact one file had version 1.10.
+
  Revision 1.8  2003/01/10 11:03:28  abigail
  Added complete CVS history.
 

lib/Regexp/Common/number.pm

@@ -260,6 +260,14 @@ Under C<-keep>, the number will be captured in $1.
 =head1 HISTORY
 
  $Log: number.pm,v $
+ Revision 2.100  2003/01/21 23:19:40  abigail
+ The whole world understands RCS/CVS version numbers, that 1.9 is an
+ older version than 1.10. Except CPAN. Curse the idiot(s) who think
+ that version numbers are floats (in which universe do floats have
+ more than one decimal dot?).
+ Everything is bumped to version 2.100 because CPAN couldn't deal
+ with the fact one file had version 1.10.
+
  Revision 1.6  2002/12/27 23:33:15  abigail
  Roman numbers.
 

lib/Regexp/Common/whitespace.pm

@@ -59,6 +59,14 @@ This pattern does not capture under C<-keep>.
 =head1 HISTORY
 
  $Log: whitespace.pm,v $
+ Revision 2.100  2003/01/21 23:19:40  abigail
+ The whole world understands RCS/CVS version numbers, that 1.9 is an
+ older version than 1.10. Except CPAN. Curse the idiot(s) who think
+ that version numbers are floats (in which universe do floats have
+ more than one decimal dot?).
+ Everything is bumped to version 2.100 because CPAN couldn't deal
+ with the fact one file had version 1.10.
+
  Revision 1.2  2002/08/27 16:59:39  abigail
  Fix POD