/^use warnings/a
require bytes;
.
/"Content-Length" => length/s/length/bytes::&/
w