Mercurial > hg > nginx-tests
comparison access_log.t @ 458:ae69f9bdba92
Tests: fixed access_log.t on win32.
Compressed logs aren't translated by PerlIO, hence newlines may vary (and will
be CRLF on win32).
author | Maxim Dounin <mdounin@mdounin.ru> |
---|---|
date | Mon, 01 Sep 2014 14:51:55 +0400 |
parents | be98c162f8bc |
children | da1a459c9318 |
comparison
equal
deleted
inserted
replaced
457:4ceb2d12b7d2 | 458:ae69f9bdba92 |
---|---|
130 eval { require IO::Uncompress::Gunzip; }; | 130 eval { require IO::Uncompress::Gunzip; }; |
131 skip("IO::Uncompress::Gunzip not installed", 1) if $@; | 131 skip("IO::Uncompress::Gunzip not installed", 1) if $@; |
132 | 132 |
133 my $gzipped = read_file($t, 'compressed.log'); | 133 my $gzipped = read_file($t, 'compressed.log'); |
134 IO::Uncompress::Gunzip::gunzip(\$gzipped => \$log); | 134 IO::Uncompress::Gunzip::gunzip(\$gzipped => \$log); |
135 is($log, "/compressed:200\n", 'compressed log - flush time'); | 135 like($log, qr!^/compressed:200!s, 'compressed log - flush time'); |
136 } | 136 } |
137 | 137 |
138 # now verify all other logs | 138 # now verify all other logs |
139 | 139 |
140 $t->stop(); | 140 $t->stop(); |