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 7f07c4e914225e8f006e86a02db99b7391ee7471..212dec5c8e7486935cefd448bd48158458155299 100644 (file)
--- a/lib/PLP/Fields.pm
+++ b/lib/PLP/Fields.pm
@@ -1,6 +1,9 @@
 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.
@@ -114,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