Dmitry Tsigelnik wrote:
t/TEST -verbose apache/util.t[...]
t/apache/util....1..8[...]
# 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
Dmitry, please take a look at t/response/TestApache/util.pm and see what's wrong.
I think:
$x = "A?A?A?A?A?A?, 25 A?A?A?A?A?A? 2004 09:09:26 GMT"; print $x =~ /^\w+, \d\d \w+ \d\d\d\d \d\d:\d\d:\d\d/ ? "OK" : "NOT OK";
the $x string should match that pattern. Unless something is wrong with perl's regex engine. It seems that this 'A?' char is not matching \w.
-- __________________________________________________________________ Stas Bekman JAm_pH ------> Just Another mod_perl Hacker http://stason.org/ mod_perl Guide ---> http://perl.apache.org mailto:[EMAIL PROTECTED] http://use.perl.org http://apacheweek.com http://modperlbook.org http://apache.org http://ticketmaster.com
-- 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
