TK :: ¸Þ°¡

TK :: Mega´Â ¼ø¼öÇÑ Perl¿¡ À§Á¬À» ÀÛ¼ºÇÏ´Â PERL / TK Áö¿øÀÔ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

TK :: ¸Þ°¡ ¼øÀ§ ¹× ¿ä¾à

±¤°í

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

TK :: ¸Þ°¡ ű×


TK :: ¸Þ°¡ ¼³¸í

TK :: Mega´Â ¼ø¼öÇÑ Perl¿¡ À§Á¬À» ÀÛ¼ºÇÏ´Â Perl / TK Áö¿øÀÔ´Ï´Ù. TK :: Mega´Â ¼ø¼öÇÑ perl.synopsisDefine¿¡ À§Á¬À» ÀÛ¼ºÇÏ´Â perl / tk Áö¿ø À§Á¬ÀÇ »õ Ŭ·¡½º À̸§ : package tk :: myNewWidget; º¹ÇÕ À§Á¬ Ŭ·¡½ºÀÇ °æ¿ì : ±âº» qw / tk :: container /; # ¿©±â¼­ ÄÁÅ×À̳ʰ¡ ÇÁ·¹ÀÓ ¶Ç´Â Å×Æú Ŭ·¡½º ÀÎ °æ¿ì : ±âº» QW / TK :: ÆÄ»ý µÈ TK :: DERIVEDWIDGET /; TKÀÇ ³×ÀÓ ½ºÆäÀ̽º¿¡ »õ À§Á¬À» ¼³Ä¡ÇÏ°í Ŭ·¡½º ¹× ÀνºÅϽº »ý¼ºÀÚ¸¦ ¼³Á¤ÇϽʽÿÀ. TK :: À§Á¬ 'MyNewWidget'À» ±¸¼ºÇÕ´Ï´Ù. Sub Classinit {My ($ self, $ args) = @_; ...} ÇÏÀ§ ä¿ì±â {My ($ self, $ args) = @_; ...} ¿ä±¸ »çÇ× : ¡¤ Perl.


TK :: ¸Þ°¡ °ü·Ã ¼ÒÇÁÆ®¿þ¾î

net :: snooplog.

NET :: SNOOPLOG´Â RFC1761 Snoop Ver 2¿¡¼­ Snoop Network Packet ·Î±×¸¦ Àд µ¥ »ç¿ëµÇ´Â Perl ¸ðµâÀÔ´Ï´Ù. ...

154

´Ù¿î·Îµå