Catalyst :: Manual :: Tutorial :: AdvancedCroud.

Catalyst :: Manual :: Tutorial :: AdvancedCroud´Â Ã˸ŠÀÚ½À¼­ÀÔ´Ï´Ù. - ÆÄÆ® 8 : °í±Þ Å©·çÀ̵åÀÔ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

Catalyst :: Manual :: Tutorial :: AdvancedCroud. ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Kennedy Clark
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~mramberg/Catalyst-Runtime-5.7012/lib/Catalyst/Manual/Installation/CentOS4.pod

Catalyst :: Manual :: Tutorial :: AdvancedCroud. ű×


Catalyst :: Manual :: Tutorial :: AdvancedCroud. ¼³¸í

Catalyst :: Manual :: Tutorial :: AdvancedCroud´Â Ã˸ŠÀÚ½À¼­ÀÔ´Ï´Ù. - ÆÄÆ® 8 : °í±Þ Crud. Catalyst :: Manual :: Tutorial :: AdvancedCroud´Â ÆíÁý±â¿¡¼­ Æû »ý¼º ÇïÆÛ ¸Þ¼Òµå Part 8 : Advanced Crud.add Æû / myApp / Controller / books.pmÀ» Ãß°¡ÇÏ°í ´ÙÀ½ ¹æ¹ýÀ» Ãß°¡ÇÕ´Ï´Ù. = head2 make_book_widget ºôµå Ã¥ »ý¼º ¹× ¾÷µ¥ÀÌÆ®¸¦À§ÇÑ HTML :: À§Á¬ ¾ç½Ä = SUB MAKE_BOOK_WIDGET {MY ($ Self, $ C) = @_; # HTML :: À§Á¬À» ¸¸µì´Ï´Ù. $ W = $ C-> À§Á¬ ( 'book_form') -> ¸Þ¼­µå ( 'post'); # ÀúÀÚ°¡ ³» @authorobjs = $ c-> ¸ðµ¨ ( "myAppDB :: Author") -> ¸ðµÎ (); my @authors = map {$ _-> id => $ _> last_name} Á¤·Ä {$ a-> last_name cmp $ b-> last_name} @authorobjs; # feilds $ w-> ¿ä¼Ò ( 'textfield', 'title') -> ·¹À̺í ( 'Á¦¸ñ') -> Å©±â (60); $ w-> ¿ä¼Ò ( 'TextField', 'µî±Þ') -> ·¹À̺í ( 'µî±Þ') -> Å©±â (1); $ w-> ¿ä¼Ò ( 'select', 'authors') -> ·¹À̺í ( 'ÀúÀÚ') -> ¿É¼Ç (@authors); $ w-> ¿ä¼Ò ( 'Á¦Ãâ', 'Á¦Ãâ') -> °ª ( 'Á¦Ãâ'); # À§Á¬ ¹Ýȯ $ w; }ÀÌ ¸Þ¼Òµå´Â ÇØ´ç Çʵ尡ÀÖ´Â HTML :: À§Á¬ ±â¹Ý ¾ç½ÄÀ» ÀÛ¼ºÇÏ´Â Áß¾Ó À§Ä¡¸¦ Á¦°øÇÕ´Ï´Ù. "ÀúÀÚ ¾ò±â"ÄÚµå´Â DBIC¸¦ »ç¿ëÇÏ¿© ¸ðµ¨ °´Ã¼ ¸ñ·ÏÀ» °Ë»ö ÇÑ ´ÙÀ½ ¸ÊÀ» »ç¿ëÇÏ¿© Çؽà Ű°¡ ÀÛ¼ºÀÚ Å×À̺íÀÇ µ¥ÀÌÅͺ£À̽º ±âº» Å°¿Í °ü·Ã °ªÀÌ ÀúÀÚÀÇ ¸¶Áö¸· À̸§ÀÔ´Ï´Ù. ¿ä±¸ »çÇ× : ¡¤ Perl.


Catalyst :: Manual :: Tutorial :: AdvancedCroud. °ü·Ã ¼ÒÇÁÆ®¿þ¾î