http :: body. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Andy Grundman
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~agrundma/Catalyst-Plugin-Session-Store-DBI-0.11/lib/Catalyst/Plugin/Session/Store/DBI.pm
http :: body. ű×
http :: body. ¼³¸í
http :: º»¹®Àº HTTP ¹Ùµð ÆļÀÔ´Ï´Ù. HTTP :: Body´Â HTTP º»¹® ÆļÀÔ´Ï´Ù .Synopsis HTTP :: BODY¸¦ »ç¿ëÇÕ´Ï´Ù. ¼ºê Çڵ鷯 : ¹æ¹ý {My ($ class, $ r) = @_; $ CONTONT_TYPE = $ R-> headers_in-> get ( 'content-type'); MY $ CONTRONAT_LENGTH = $ R-> headers_in-> get ( 'content-length'); ³» $ body = http :: body-> new ($ content_type, $ content_length); ³» $ length = $ content_length; ($ length) {$ R-> Àбâ ($ ¹öÆÛ, ($ ±æÀÌ <8192)? $ ±æÀÌ : 8192); $ ±æÀÌ-= ±æÀÌ ($ ¹öÆÛ); $ body-> add ($ ¹öÆÛ); } My $ Uploads = $ Body-> ¾÷·Îµå; # hashref my $ params = $ body-> param; # hashref ³» $ body = $ body-> ¸ö; # io :: handle} ¿ä±¸ »çÇ× : ¡¤ Perl.
http :: body. °ü·Ã ¼ÒÇÁÆ®¿þ¾î