$ perl -MHTTP::Request::Common -e " my $f = HTTP::Request->parse ( qq{PATCH /file.txt HTTP/1.1\nHost: www.example.com\nC ontent-Type: application/example\nIf-Match: "e0023aa4e"\nContent-Length: 100\n\n[description of changes]} ); $f->dump " PATCH /file.txt HTTP/1.1 Host: www.example.com If-Match: e0023aa4e Content-Length: 100 Content-Type: application/example [description of changes]