$c->autoflush(1);
my @request_headers = <$c>;  # line 3

for $header_line (@request_headers)
   { print $header_line;  }