Term :: Ansimenu.

Term :: Ansimenu´Â ANSI °¡´É ´Ü¸»±â¿¡¼­ ¸Þ´º¸¦ ¸¸µå´Â ÀÎÇÁ¶óÀÔ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

Term :: Ansimenu. ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • J.A. de Vries
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~jadev/Term-ANSIMenu-0.02/ANSIMenu.pm

Term :: Ansimenu. ű×


Term :: Ansimenu. ¼³¸í

Term :: Ansimenu´Â ANSI °¡´É ´Ü¸»±â¿¡¼­ ¸Þ´º¸¦ ¸¸µå´Â ÀÎÇÁ¶óÀÔ´Ï´Ù. Term :: Ansimenu´Â ANSI ´É·Â Å͹̳ο¡¼­ ¸Þ´º¸¦ ¸¸µå´Â ÀÎÇÁ¶óÀÔ´Ï´Ù .Synopsis »ç¿ë ±â°£ :: Ansimenu; MY $ MENU = TERM :: ANSIMENU-> NEW (width => 40, help => , , , ], Á¦¸ñ => 'Á¦¸ñ', Ç׸ñ => , , ], status =>'status ', ÇÁ·ÒÇÁÆ® =>'ÇÁ·ÒÇÁÆ® : '); $ ¸Þ´º -> print_menu (); while (my $ key = $ menu-> read_key ()) {Á¤ÀÇ µÈ $ ¸Þ´º -> do_key ($ Å°); $ ¸Þ´º -> update_status ( '') $ Å° EQ 's'ÀÎ °æ¿ì; $ menu-> update_status ( '»õ »óÅÂ') $ Å° EQ 'ÀÇ °æ¿ì; $ ¸Þ´º -> update_prompt ( ') $ Å° EQ'p 'ÀÎ °æ¿ì; $ ¸Þ´º -> update_prompt ( '»õ ÇÁ·ÒÇÁÆ® :') $ Å° EQ 'P'ÀÎ °æ¿ì; } $ ¸Þ´º -> POS ($ menu-> line_after_menu () + 1, 1); ³ª´ÂÀÌ ÀÛ¾÷À» À§ÀÓÇÏ´Â Á÷¿øµé¿¡°Ô ½±°Ô »ì¾Æ°¡´Â °ÍÀ» ½±°Ô ½è´Ù. ±× Áß ´ëºÎºÐÀº º¹ÀâÇÑ ¸í·ÉÀ» ÀÔ·ÂÇÏ´Â ´ë½Å ¸Þ´º¸¦ »ç¿ëÇÏ´Â °ÍÀ» ¼±È£ÇÕ´Ï´Ù. ±×µé¿¡°Ô ±×°ÍÀº ´õ ºü¸£°í ¾ÈÀüÇÑ ÀÏÀÔ´Ï´Ù. »óȲ¿¡ ¸Â´Â µµ¿ò¸»À̳ª »óÅ ǥ½Ã ÁÙÀÌ ÇÊ¿äÇմϱî? ´ÜÃàÅ°¸¦ »ç¿ëÇÏ°í ½Í½À´Ï±î? È­·ÁÇÑ »ö»ó°ú ½ºÅ¸ÀÏÀ» ¿øÇϽʴϱî? °Å±â¿¡ ÀÖ½À´Ï´Ù. ±×³É ¼Ó¼ºÀ» ä¿ì°í Go.Requirements : ¡¤ Perl ¿ä±¸ »çÇ× : ¡¤ Perl.


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