Mercurial > hg > nginx-tests
comparison sub_filter_slice.t @ 1612:8659123d2d37
Tests: made http_content() exportable.
author | Maxim Dounin <mdounin@mdounin.ru> |
---|---|
date | Tue, 17 Nov 2020 17:39:09 +0300 |
parents | 766bcbb632ee |
children |
comparison
equal
deleted
inserted
replaced
1611:dbeb4c896f7e | 1612:8659123d2d37 |
---|---|
15 use Test::More; | 15 use Test::More; |
16 | 16 |
17 BEGIN { use FindBin; chdir($FindBin::Bin); } | 17 BEGIN { use FindBin; chdir($FindBin::Bin); } |
18 | 18 |
19 use lib 'lib'; | 19 use lib 'lib'; |
20 use Test::Nginx; | 20 use Test::Nginx qw/ :DEFAULT http_content /; |
21 | 21 |
22 ############################################################################### | 22 ############################################################################### |
23 | 23 |
24 select STDERR; $| = 1; | 24 select STDERR; $| = 1; |
25 select STDOUT; $| = 1; | 25 select STDOUT; $| = 1; |
81 | 81 |
82 # server is assumed to return the requested range | 82 # server is assumed to return the requested range |
83 | 83 |
84 $r = get('/t', 'Range: bytes=3-4'); | 84 $r = get('/t', 'Range: bytes=3-4'); |
85 like($r, qr/ 206 /, 'range request - 206 partial reply'); | 85 like($r, qr/ 206 /, 'range request - 206 partial reply'); |
86 is(Test::Nginx::http_content($r), '34', 'range request - correct content'); | 86 is(http_content($r), '34', 'range request - correct content'); |
87 | 87 |
88 } | 88 } |
89 | 89 |
90 ############################################################################### | 90 ############################################################################### |
91 | 91 |