html :: formengine.

HTML :: FormEngineÀº HTML / XHTML ¾ç½ÄÀ» ÀÛ¼º, À¯È¿¼º °Ë»ç ¹× Á¦¾îÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

html :: formengine. ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Moritz Sinn
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~morni/XML-ParseDTD-0.1.4/ParseDTD.pm

html :: formengine. ű×


html :: formengine. ¼³¸í

HTML :: FormEngineÀº HTML / XHTML ¾ç½ÄÀ» ÀÛ¼º, À¯È¿¼º °Ë»ç ¹× Á¦¾îÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. HTML :: FormEngineÀº HTML / XHTML Forms.Example ÄÚµå #! / usr / bin / perlÀ» ÀÛ¼º, À¯È¿¼º °Ë»ç ¹× Á¦¾îÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. CGI »ç¿ë; HTML :: FormEngineÀ» »ç¿ëÇϽʽÿÀ. # posix; # setlocale #setlocale (lc_messages, 'german'); # µ¶ÀÏ¾î ¿À·ù ¸Þ½ÃÁöÀÇ $ Q = »õ CGI; $ Q-> Çì´õ Àμâ; MY $ Form = HTML :: FormEngine-> New (½ºÄ®¶ó $ Q-> vars); my @form = ({templ => 'select', name => 'soreution', option => ', 'MRS.']],}, {templ => 'hidden_no_title', À̸§ => 'test123', value => 'test',}, {size => 10, maxlen => 20, prefix => , name => 'name', title => 'for / surname', error_in => 'not_null'}, {maxlen => night => 'email', error => , # rfc822 ÀüÀÚ ¸ÞÀÏ ÁÖ¼Ò Ç¥ÁØ}, {templ =>'¶óµð¿À ', title =>'´º½º ·¹ÅÍ ±¸µ¶? ', À̸§ =>'´º½º ·¹ÅÍ ', opt_val => ] , ¿É¼Ç => , °ª => 1}, {templ =>'È®ÀÎ ", ¿É¼Ç => 'Á¶°Ç Á¶°Ç¿¡ µ¿ÀÇÇÕ´Ï´Ù!', À̸§ = À̸§ = > "µ¿ÀÇ ÇÔ", title => '', error => sub {¹Ýȯ ( "µ¿ÀÇ ÇϽŴÙ!") if (shift);}}); $ form-> set_seperate (1); $ ¾ç½Ä -> conf (@Form); $ ¾ç½Ä -> make (); $ Q-> start_html Àμâ ( 'Formengine ¿¹ : µî·Ï'); if ($ ¾ç½Ä -> È®ÀÎ) {$ Form-> clear (); "´ç½ÅÀº ¼º°øÀûÀ¸·Î °¡ÀÔÇß½À´Ï´Ù!"; } $ Form-> Get, $ Q-> END_HTML Àμâ; ¿ä±¸ »çÇ× : ¡¤ À×¾î ¡¤ Perl.


html :: formengine. °ü·Ã ¼ÒÇÁÆ®¿þ¾î

Libresource.

Libresource´Â ºÐ»ê Ä¿¹Â´ÏƼÀÇ ¼ÒÇÁÆ®¿þ¾î °³¹ß ¹× °ü¸® Àü¿ë ¼ÒÇÁÆ®¿þ¾î Ç÷§ÆûÀÔ´Ï´Ù. ...

80

´Ù¿î·Îµå

Svnbot.

SVNBOT ¼ÒÇÁÆ®¿þ¾î´Â SVN ÀúÀå¼Ò¸¦ ¸ð´ÏÅ͸µÇϱâÀ§ÇÑ Jabber BotÀÔ´Ï´Ù. ...

145

´Ù¿î·Îµå