http :: Server :: Brick.

ÇÁ·ÎÅä ŸÀÌÇÎÀ»À§ÇÑ °£´ÜÇÑ ¼ø¼ö Perl HTTP ¼­¹ö "·çºñÀÇ Webrick ½ºÅ¸ÀÏ
Áö±Ý ´Ù¿î·Îµå

http :: Server :: Brick. ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Mark Aufflick
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~aufflick/

http :: Server :: Brick. ű×


http :: Server :: Brick. ¼³¸í

ÇÁ·ÎÅä ŸÀÌÇÎÀ»À§ÇÑ °£´ÜÇÑ ¼ø¼öÇÑ Perl HTTP ¼­¹ö "½ºÅ¸ÀÏ"·çºñÀÇ Webrick http :: Server :: BrickÀº "·çºñÀÇ Webrick.Synopsis"http :: Server :: BrickÀ» »ç¿ëÇÏ´Â "·çºñÀÇ Webrick.Synopsis"ÇÁ·ÎÅä ŸÀÌÇÎÀ»À§ÇÑ °£´ÜÇÑ ¼ø¼ö Perl HTTP ¼­¹öÀÔ´Ï´Ù. http :: status; MY $ Server = http :: Server :: Brick-> New (port => 8888); $ Server-> mount ( '/ foo / bar'=> {path => / some / directory / htdocs ',}); $ Server-> mount ( '/ test / proc'=> {handler => sub {my ($ req, $ res) = @_; $ res-> add_content ( "°æ·Î Á¤º¸ : $ req -> {path_info}" ); 1;}, ¿ÍÀϵå Ä«µå => 1,}); $ Server-> mount ( '/ test / proc / texty'=> {handler => sub {my ($ req, $ res) = @_; $ res-> add_content ( "flubber"); $ res-> Çì´õ ( 'Content-Type', 'text / plain'); 1;}, ¿ÍÀϵå Ä«µå => 1,}); #ÀÌ ´ÙÀ½ µÎ °¡Áö´Â $ Server-> mount ( '/favicon.ico'=> {handler => sub {rc_not_found},}); $ Server-> mount ( '/favicon.ico'=> {handler => sub {my ($ req, $ res) = @_; $ res-> ÄÚµå (rc_not_found); 1;},}; # ¼ö¶ô ¿äûÀ» ½ÃÀÛÇϽʽÿÀ (ÇÁ·Î¼¼½º #°¡ HUP ½ÅÈ£¸¦¹ÞÀ» ¶§±îÁö / µÉ ¶§±îÁö ¸®ÅÏÇÏÁö ¾ÊÀ½) $ SSL -> STL (HTTPS) ¼­¹öÀÇ °æ¿ì À§ÀÇ »õ () ÇàÀ» ¹Ù²ß´Ï´Ù. http :: daemon :: ssl »ç¿ë ...¿¡ $ Server = http :: Server :: Brick-> New (port => 8889, daemon_class => 'http :: daemon :: ssl', daemon_args => ,); ¿ä±¸ »çÇ× : ¡¤ Perl.


http :: Server :: Brick. °ü·Ã ¼ÒÇÁÆ®¿þ¾î