Ŭ·¡½º :: Strongsingleton.Ŭ·¡½º :: StrongSingletonÀº ´õ °·ÂÇÏ°í ¾ÈÀüÇÑ Singleton Base Ŭ·¡½ºÀÔ´Ï´Ù. | |
Áö±Ý ´Ù¿î·Îµå |
Ŭ·¡½º :: Strongsingleton. ¼øÀ§ ¹× ¿ä¾à
±¤°í
- ƯÇã:
- Perl Artistic License
- °¡°Ý:
- FREE
- °Ô½ÃÀÚ À̸§:
- Stevan Little
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~stevan/
Ŭ·¡½º :: Strongsingleton. ű×
Ŭ·¡½º :: Strongsingleton. ¼³¸í
Class :: StrongSingletonÀº ´õ °ÇÏ°í ¾ÈÀüÇÑ ½Ì±Û Åæ ±âº» Ŭ·¡½ºÀÔ´Ï´Ù. Ŭ·¡½º :: StrongsingletonÀº ´õ °·ÂÇÏ°í ¾ÈÀüÇÑ ½Ì±Û Å溣À̽º Ŭ·¡½ºÀÔ´Ï´Ù. Synopsis ÆÐÅ°Áö My :: Singleton :: Class; ±âº» QW (Ŭ·¡½º :: StrongSingleton)¸¦ »ç¿ëÇϽʽÿÀ. ÇÏÀ§ »õ {My ($ class, % my_params) = @_; # °´Ã¼ ÀνºÅϽº ¸¸µé±â MY $ ÀνºÅϽº = {% my_params}; Ãູ ($ ÀνºÅϽº, $ Ŭ·¡½º); # ½Ì±Û Åæ $ ÀνºÅϽº·Î ÃʱâÈ -> _ init_strongsingleton (); ¹Ýȯ $ ÀνºÅϽº; } 1; # ´Ê°Ô Äڵ忡¼ ... # Ŭ·¡½ºÀÇ Ã¹ ¹ø° ÀνºÅϽº¸¦ ¸¸µì´Ï´Ù. My $ ÀνºÅϽº = My :: Singleton :: Class-> New (param => "°ª"); # '»õ'¸¦ ´Ù½Ã ¸¸µé·Á°í ÇÏ °í # ¶È°°Àº ÀνºÅϽº·Î ³¡³ªÁö ¾Ê°í »õ·Î¿î ÇϳªÀÇ $ instance2 = my :: singleton :: class-> new (param => "´Ù¸¥ °ª"); # ÀüÈ °É±â 'ÀνºÅϽº'´Â ½Ì±Û Åæ # ÀνºÅϽº¸¦ ¹ÝȯÇÕ´Ï´Ù. $ ÀνºÅϽº 3 = My :: Singleton :: Class-> ÀνºÅϽº (); # °ÅÀÇ ÇÊ¿äÇÏÁö ¾Ê¾ÆµµµË´Ï´Ù. # ½Ì±Û Åæ # ½Ì±Û Åæ # ½ÌÅ©> Æı« ()¸¦ ÅëÇØ ½Ì±Û Åæ #À» Æı« ÇÒ ¼ö ÀÖ½À´Ï´Ù. # ¶Ç´Â Ŭ·¡½º¸¦ ÅëÇØ My :: Singleton :: Class-> Destroy (); ¹°·Ð, ´ç½ÅÀÌ ´ç½ÅÀÌ destory¸¦ ÀçÁ¤ÀÇÇÏÁö ¾ÊÀº °ÍÀ¸·Î °¡Á¤ÇÕ´Ï´Ù. ÀÌ ¸ðµâÀº Class :: Singleton ¹× Class :: DefaMsingletonÀÇ ´ë¾ÈÀ̸ç, ¿©·¯ ÀνºÅϽºÀÇ ¿ì¹ßÀû ÀÎ »ý¼º ¹× / ¶Ç´Â Á¸ÀçÇÏ´Â ½Ì±Û Åæ ÀνºÅϽºÀÇ µ¤¾î ¾²±â °¡´É¼ºÀ» ¹æÁöÇϱâÀ§ÇÑ Á¶Ä¡°¡ ÃëÇØÁö´Âº¸´Ù ¾ÈÀüÇÑ ½Ì±Û Åæ Ŭ·¡½º¸¦ Á¦°øÇÕ´Ï´Ù. ÀÚ¼¼ÇÑ ºñ±³¸¦ À§Çؼ´Â "ÂüÁ¶"¼½¼ÇÀ» ÂüÁ¶ÇϽʽÿÀ. ù°, »ç¿ëÀÚ´Â Á¤»óÀûÀÎ ¹æ½ÄÀ¸·Î Ŭ·¡½ºÀÇ Ã¹ ¹ø° ½Ì±Û Åæ ÀνºÅϽº¸¦ »ý¼ºÇÕ´Ï´Ù. MY $ OBJ = MY :: SingleTON :: Class-> New ( "º¯¼ö", "¸Å°³ º¯¼ö");ÀÌ ÀνºÅϽº´Â Ŭ·¡½º :: StrongSingleton ÆÐÅ°Áö ³»ÀÇ ¾îÈÖ ÀûÀ¸·Î ¹üÀ§°¡ ÁöÁ¤µÈ º¯¼ö ³»¿¡ ÀúÀåµË´Ï´Ù. ÀÌ·¸°ÔÇÏ¸é º¯¼ö°¡ Ŭ·¡½º :: StrongSingleTon ÆÐÅ°ÁöÀÇ ¸Þ¼ÒµåÀÇ ¸Þ¼Òµå¿¡ ÀÇÇØ ¾×¼¼½ºµÇ´Â °ÍÀ» ¹æÁöÇÕ´Ï´Ù. ÀÌ ½ÃÁ¡¿¡¼µµ Ŭ·¡½ºÀÇ »õ ¸Þ¼Òµå°¡ ¹«½ÃµÇ¹Ç·Î Ç×»ó ½Ì±Û Åæ ÀνºÅϽº¸¦ ¹ÝȯÇÕ´Ï´Ù. ÀÌ·¸°ÔÇÏ¸é ½Ì±Û Åæ ÀνºÅϽºÀÇ ¿ì¹ßÀû ÀÎ µ¤¾î ¾²±â°¡ ¹æÁöµË´Ï´Ù. Áï, ´ÙÀ½ ÄÚµå ¶óÀÎ Áß Çϳª°¡ ¸ðµÎ µ¿ÀÏÇÑ ÀνºÅϽº¸¦ »ý¼ºÇÑ´Ù´Â °ÍÀ» ÀǹÌÇÕ´Ï´Ù. ³» $ ÀνºÅϽº = $ obj-> instance (); MY $ ÀνºÅϽº = MY :: Singleton :: Class-> ÀνºÅϽº (); ³» $ ÀνºÅϽº = $ obj-> new (); MY $ ÀνºÅϽº = MY :: Singleton :: Class-> New (); °³ÀÎÀûÀ¸·Î »õ·Î¿î ¹æ¹ýÀÇ »ç¿ëÀ» ¿ÏÀüÈ÷ ³«´ã½ÃÅ°´Â 4 °¡Áö ½ºÅ¸ÀÏÀÇ °»´ÜÀÇ °»´ÜÀ» °³¼±ÇÏ´Â °ÍÀÔ´Ï´Ù. ÀÌ ¹æ¹ýÀ» ÅëÇØ »ç¿ëÀÚ´Â ½ÇÁ¦·Î ½ÇÁ¦·Î ½Ì±Û ÅæÀ̶ó´Â °ÍÀ» ¾ËÁö ¸øÇØ Á¤»óÀûÀÎ ¹æ¹ýÀ¸·Î ½Ì±Û Åæ Ŭ·¡½º¸¦ »ç¿ëÇÒ ¼ö ÀÖ½À´Ï´Ù. µðÀÚÀÎÀÌ º¯°æµÇ¸é ÀÌ´Â Æí¸® ÇÒ ¼ö ÀÖÀ¸¸ç ´õ ÀÌ»ó Ŭ·¡½º°¡ ½Ì±Û ÅæÀ¸·Î ÇÊ¿äÇÏÁö ¾Ê½À´Ï´Ù. ¿ä±¸ »çÇ× : ¡¤ Perl.
Ŭ·¡½º :: Strongsingleton. °ü·Ã ¼ÒÇÁÆ®¿þ¾î
WebSphere :: MQTT :: Client.
WebSphere :: MQTT :: Client´Â WebSphere MQ Telemetry Àü¼Û Ŭ¶óÀ̾ðÆ®ÀÔ´Ï´Ù. ...
266
ÅؽºÆ® :: VisualWidth
text :: VisualWidth´Â ÇÏÇÁ ³Êºñ¿Í Àüü ³Êºñ ¹®ÀÚ¸¦ ó¸®ÇÏ´Â ±â´ÉÀ» Á¦°øÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. ...
161