www :: Æú

www :: pollÀº À¥ Á¶»ç¸¦ ±¸ÃàÇÏ´Â Perl È®ÀåÀÚÀÔ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

www :: Æú ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Mike Gammon
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~mgammon/WWW-Poll-0.01/Poll.pm

www :: Æú ű×


www :: Æú ¼³¸í

www :: pollÀº À¥ Á¶»ç¸¦ ºôµåÇÏ´Â Perl È®ÀåÀÚÀÔ´Ï´Ù. www :: pollÀº À¥ Á¶»ç¸¦ ºôµåÇÏ´Â Perl È®ÀåÀÚÀÔ´Ï´Ù. Perl ¸ðµâÀº ³»Àå µÈ °ü¸® ±â´ÉÀ» »ç¿ëÇÏ¿© À¥ Æú¸µÀ» ±¸ÃàÇÏ°í ½ÇÇàÇÕ´Ï´Ù. Synopsis »ç¿ë ¼³¹® Á¶»ç. ³» $ Poll = »õ Æú; $ poll-> °æ·Î ( '/ system / path / to / data / directory'); # ÅõÇ¥ ¹× ¹Ýȯ ¼³¹® Á¶»ç °á°ú $ poll-> ÅõÇ¥ ($ ans_key); $ html = $ poll-> get_html (); Àμâ "Content-Type : text / htmlnn"; $ HTMLÀ» ÀμâÇϽʽÿÀ. # - »õ·Î¿î ¼³¹® Á¶»ç¸¦ ¸¸µì´Ï´Ù - # $ ÆúÆ® -> Áú¹® ( 'Trent Lott°¡ ±×ÀÇ À̹߻縦 ¹Ù²Ù¾î¾ßÇմϱî?'); $ poll-> add_answers ( "¿¹", "¾Æ´Ï¿À", "´©°¡ ´©°¡ Trent Lott?"µî); $ poll-> create (); ¿ä±¸ »çÇ× : ¡¤ Perl.


www :: Æú °ü·Ã ¼ÒÇÁÆ®¿þ¾î