output multiline %headers as multiple headers of the same name

[perl/plp/.git] / lib / PLP / Fields.pm

diff --git a/lib/PLP/Fields.pm b/lib/PLP/Fields.pm
index 01f3baf964ee41661c12f4dbd6bd4ae05fc0a48d..212dec5c8e7486935cefd448bd48158458155299 100644 (file)
--- a/lib/PLP/Fields.pm
+++ b/lib/PLP/Fields.pm
@@ -3,6 +3,8 @@ package PLP::Fields;
 use strict;
 use warnings;
 
+our $VERSION = '1.00';
+
 # Has only one function: doit(), which ties the hashes %get, %post, %fields
 # and %header in PLP::Script. Also generates %cookie immediately.
 sub doit {
@@ -115,6 +117,10 @@ when sending the headers is the one you used first. The following are equal:
     $header{Content_Type}
     $headers{CONTENT_type}
 
+If a value contains newlines, the header is repeated for each line:
+
+       $header{Allow} = "HEAD\nGET";  # equivalent to HEAD,GET
+
 =back
 
 =head1 AUTHOR