From 2399690b533a3f0c584addae366aab23b23cb3ed Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Mon, 4 Nov 2019 03:01:34 +0000 Subject: [PATCH] t/httpd-corner.t: drop unnecessary bytes:: for length() We don't need to force byte semantics for a buffer we clearly create (via ->read) with byte semantics. Since we didn't "use bytes" in t/httpd-corner.t, it was inadvertantly made available by IPC::Run (which goes away, next). --- t/httpd-corner.t | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/t/httpd-corner.t b/t/httpd-corner.t index fbba4623..50aa28e3 100644 --- a/t/httpd-corner.t +++ b/t/httpd-corner.t @@ -144,7 +144,7 @@ SKIP: { $conn->write($payload . "\r\n0\r\n\r\nGET /empty HTTP/1.0\r\n\r\n"); $conn->read(my $buf, 4096); my $lim = 0; - $lim++ while ($conn->read($buf, 4096, bytes::length($buf)) && $lim < 9); + $lim++ while ($conn->read($buf, 4096, length($buf)) && $lim < 9); my $exp = sha1_hex($payload); like($buf, qr!\r\n\r\n${exp}HTTP/1\.0 200 OK\r\n!s, 'chunk parser can handled pipelined requests'); -- 2.48.1