.\" Automatically generated by Pod::Man 2.27 (Pod::Simple 3.28) .\" .\" Standard preamble: .\" ======================================================================== .de Sp \" Vertical space (when we can't use .PP) .if t .sp .5v .if n .sp .. .de Vb \" Begin verbatim text .ft CW .nf .ne \\$1 .. .de Ve \" End verbatim text .ft R .fi .. .\" Set up some character translations and predefined strings. \*(-- will .\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left .\" double quote, and \*(R" will give a right double quote. \*(C+ will .\" give a nicer C++. Capital omega is used to do unbreakable dashes and .\" therefore won't be available. \*(C` and \*(C' expand to `' in nroff, .\" nothing in troff, for use with C<>. .tr \(*W- .ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p' .ie n \{\ . ds -- \(*W- . ds PI pi . if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch . if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\" diablo 12 pitch . ds L" "" . ds R" "" . ds C` "" . ds C' "" 'br\} .el\{\ . ds -- \|\(em\| . ds PI \(*p . ds L" `` . ds R" '' . ds C` . ds C' 'br\} .\" .\" Escape single quotes in literal strings from groff's Unicode transform. .ie \n(.g .ds Aq \(aq .el .ds Aq ' .\" .\" If the F register is turned on, we'll generate index entries on stderr for .\" titles (.TH), headers (.SH), subsections (.SS), items (.Ip), and index .\" entries marked with X<> in POD. Of course, you'll have to process the .\" output yourself in some meaningful fashion. .\" .\" Avoid warning from groff about undefined register 'F'. .de IX .. .nr rF 0 .if \n(.g .if rF .nr rF 1 .if (\n(rF:(\n(.g==0)) \{ . if \nF \{ . de IX . tm Index:\\$1\t\\n%\t"\\$2" .. . if !\nF==2 \{ . nr % 0 . nr F 2 . \} . \} .\} .rr rF .\" .\" Accent mark definitions (@(#)ms.acc 1.5 88/02/08 SMI; from UCB 4.2). .\" Fear. Run. Save yourself. No user-serviceable parts. . \" fudge factors for nroff and troff .if n \{\ . ds #H 0 . ds #V .8m . ds #F .3m . ds #[ \f1 . ds #] \fP .\} .if t \{\ . ds #H ((1u-(\\\\n(.fu%2u))*.13m) . ds #V .6m . ds #F 0 . ds #[ \& . ds #] \& .\} . \" simple accents for nroff and troff .if n \{\ . ds ' \& . ds ` \& . ds ^ \& . ds , \& . ds ~ ~ . ds / .\} .if t \{\ . ds ' \\k:\h'-(\\n(.wu*8/10-\*(#H)'\'\h"|\\n:u" . ds ` \\k:\h'-(\\n(.wu*8/10-\*(#H)'\`\h'|\\n:u' . ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'^\h'|\\n:u' . ds , \\k:\h'-(\\n(.wu*8/10)',\h'|\\n:u' . ds ~ \\k:\h'-(\\n(.wu-\*(#H-.1m)'~\h'|\\n:u' . ds / \\k:\h'-(\\n(.wu*8/10-\*(#H)'\z\(sl\h'|\\n:u' .\} . \" troff and (daisy-wheel) nroff accents .ds : \\k:\h'-(\\n(.wu*8/10-\*(#H+.1m+\*(#F)'\v'-\*(#V'\z.\h'.2m+\*(#F'.\h'|\\n:u'\v'\*(#V' .ds 8 \h'\*(#H'\(*b\h'-\*(#H' .ds o \\k:\h'-(\\n(.wu+\w'\(de'u-\*(#H)/2u'\v'-.3n'\*(#[\z\(de\v'.3n'\h'|\\n:u'\*(#] .ds d- \h'\*(#H'\(pd\h'-\w'~'u'\v'-.25m'\f2\(hy\fP\v'.25m'\h'-\*(#H' .ds D- D\\k:\h'-\w'D'u'\v'-.11m'\z\(hy\v'.11m'\h'|\\n:u' .ds th \*(#[\v'.3m'\s+1I\s-1\v'-.3m'\h'-(\w'I'u*2/3)'\s-1o\s+1\*(#] .ds Th \*(#[\s+2I\s-2\h'-\w'I'u*3/5'\v'-.3m'o\v'.3m'\*(#] .ds ae a\h'-(\w'a'u*4/10)'e .ds Ae A\h'-(\w'A'u*4/10)'E . \" corrections for vroff .if v .ds ~ \\k:\h'-(\\n(.wu*9/10-\*(#H)'\s-2\u~\d\s+2\h'|\\n:u' .if v .ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'\v'-.4m'^\v'.4m'\h'|\\n:u' . \" for low resolution devices (crt and lpr) .if \n(.H>23 .if \n(.V>19 \ \{\ . ds : e . ds 8 ss . ds o a . ds d- d\h'-1'\(ga . ds D- D\h'-1'\(hy . ds th \o'bp' . ds Th \o'LP' . ds ae ae . ds Ae AE .\} .rm #[ #] #H #V #F C .\" ======================================================================== .\" .IX Title "CGI::Cookie::Splitter 3pm" .TH CGI::Cookie::Splitter 3pm "2014-02-16" "perl v5.18.2" "User Contributed Perl Documentation" .\" For nroff, turn off justification. Always turn off hyphenation; it makes .\" way too many mistakes in technical documents. .if n .ad l .nh .SH "NAME" CGI::Cookie::Splitter \- Split big cookies into smaller ones. .SH "VERSION" .IX Header "VERSION" version 0.04 .SH "SYNOPSIS" .IX Header "SYNOPSIS" .Vb 1 \& use CGI::Cookie::Splitter; \& \& my $splitter = CGI::Cookie::Splitter\->new( \& size => 123, # defaults to 4096 \& ); \& \& @small_cookies = $splitter\->split( @big_cookies ); \& \& @big_cookies = $splitter\->join( @small_cookies ); .Ve .SH "DESCRIPTION" .IX Header "DESCRIPTION" \&\s-1RFC 2109\s0 reccomends that the minimal cookie size supported by the client is 4096 bytes. This has become a pretty standard value, and if your server sends larger cookies than that it's considered a no-no. .PP This module provides a pretty simple interface to generate small cookies that are under a certain limit, without wasting too much effort. .SH "METHODS" .IX Header "METHODS" .ie n .IP "new %params" 4 .el .IP "new \f(CW%params\fR" 4 .IX Item "new %params" The only supported parameters right now are \f(CW\*(C`size\*(C'\fR. It defaults to 4096. .ie n .IP "split @cookies" 4 .el .IP "split \f(CW@cookies\fR" 4 .IX Item "split @cookies" This method accepts a list of CGI::Cookie objects (or look alikes) and returns a list of CGI::Cookies. .Sp Whenever an object with a total size that is bigger than the limit specified at construction time is encountered it is replaced in the result list with several objects of the same class, which are assigned serial names and have a smaller size and the same domain/path/expires/secure parameters. .ie n .IP "join @cookies" 4 .el .IP "join \f(CW@cookies\fR" 4 .IX Item "join @cookies" This is the inverse of \f(CW\*(C`split\*(C'\fR. .ie n .IP "should_split $cookie" 4 .el .IP "should_split \f(CW$cookie\fR" 4 .IX Item "should_split $cookie" Whether or not the cookie should be split .ie n .IP "mangle_name_next $name" 4 .el .IP "mangle_name_next \f(CW$name\fR" 4 .IX Item "mangle_name_next $name" Demangles name, increments the index and remangles. .ie n .IP "mangle_name $name, $index" 4 .el .IP "mangle_name \f(CW$name\fR, \f(CW$index\fR" 4 .IX Item "mangle_name $name, $index" .PD 0 .ie n .IP "demangle_name $mangled_name" 4 .el .IP "demangle_name \f(CW$mangled_name\fR" 4 .IX Item "demangle_name $mangled_name" .PD These methods encapsulate a name mangling scheme for changing the cookie names to allo wa 1:n relationship. .Sp The default mangling behavior is not 100% safe because cookies with a safe size are not mangled. .Sp As long as your cookie names don't start with the substring \f(CW\*(C`_bigcookie_\*(C'\fR you should be \s-1OK \s0;\-) .SH "SUBCLASSING" .IX Header "SUBCLASSING" This module is designed to be easily subclassed... If you need to split cookies using a different criteria then you should look into that. .SH "SEE ALSO" .IX Header "SEE ALSO" CGI::Cookie, CGI::Simple::Cookie, , , \&\s-1RFC 2109\s0 .SH "AUTHOR" .IX Header "AUTHOR" \&\s-1XXXX XXX\s0'\s-1XX \s0(Yuval Kogman) .SH "COPYRIGHT AND LICENSE" .IX Header "COPYRIGHT AND LICENSE" This software is copyright (c) 2006 by \s-1XXXX XXX\s0'\s-1XX \s0(Yuval Kogman). .PP This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.