>> t/TEST -verbose apache/util.t
SB> [...]
>> t/apache/util....1..8
SB> [...]
>> # testing : Apache::Util::ht_time($pool)
>> # expected: (?-xism:^\w+, \d\d \w+ \d\d\d\d \d\d:\d\d:\d\d)
>> # received: A?A?A?A?A?A?, 25 A?A?A?A?A?A? 2004 09:09:26 GMT
>> not ok 1

SB> Dmitry, please take a look at t/response/TestApache/util.pm and see what's
SB> wrong.

SB> I think:

SB> $x = "A?A?A?A?A?A?, 25 A?A?A?A?A?A? 2004 09:09:26 GMT";
SB> print $x =~ /^\w+, \d\d \w+ \d\d\d\d \d\d:\d\d:\d\d/ ? "OK" : "NOT OK";

SB> the $x string should match that pattern. Unless something is wrong with
SB> perl's regex engine. It seems that this 'A?' char is not matching \w.

I see!!! test failed under locale ru_RU.utf8

Under locale "C" this test print next strings and test successful

# expected: (?-xism:^\w+, \d\d \w+ \d\d\d\d \d\d:\d\d:\d\d)
# received: Thu, 26 Aug 2004 07:05:12 GMT




-- 
Report problems: http://perl.apache.org/bugs/
Mail list info: http://perl.apache.org/maillist/modperl.html
List etiquette: http://perl.apache.org/maillist/email-etiquette.html

Reply via email to