Hi Stas,
Am Dienstag, 20. April 2004 01:31 schrieb Stas Bekman:
> Ouch, can you please submit a patch that works for you? \w+ is good, as I'm
> afraid we may have similar issues with other languges who may have 4 chars
> or else. Thanks.
Here it is. works fine for me.
Index: util.pm
===================================================================
RCS file: /home/cvspublic/modperl-2.0/t/response/TestApache/util.pm,v
retrieving revision 1.2
diff -u -r1.2 util.pm
--- util.pm 16 Mar 2004 19:46:13 -0000 1.2
+++ util.pm 19 Apr 2004 23:54:31 -0000
@@ -55,7 +55,7 @@
Apache::OK;
}
-my $fmtdate_ptn = qr/^\w\w\w, \d\d \w\w\w \d\d\d\d \d\d:\d\d:\d\d/;
+my $fmtdate_ptn = qr/^\w+, \d\d \w+ \d\d\d\d \d\d:\d\d:\d\d/;
sub time_cmp {
my($time, $fmtdate, $comment, $exact_match) = @_;
--
Boris
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
