| POSIX :: RT :: ¼¼¸¶Æ÷¾î PERIX.1B ¼¼¸¶Æ÷¾î¿¡ ´ëÇÑ Perl ÀÎÅÍÆäÀ̽º |
Áö±Ý ´Ù¿î·Îµå |
POSIX :: RT :: ¼¼¸¶Æ÷¾î ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Michael J. Pomraning
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~mjp/
POSIX :: RT :: ¼¼¸¶Æ÷¾î ű×
POSIX :: RT :: ¼¼¸¶Æ÷¾î ¼³¸í
POSIX.1B ¼¼¸¶Æ÷¾î¿¡ ´ëÇÑ Perl ÀÎÅÍÆäÀ̽º POSIX :: RT :: SemaPhore´Â ½Ã½ºÅÛ¿¡¼ Áö¿øÇÏ´Â POSIX.1B ½Ç½Ã°£ ¼¼¸¶Æ÷¾î¿¡ ´ëÇÑ °´Ã¼ ÁöÇâ Perl ÀÎÅÍÆäÀ̽º¸¦ Á¦°øÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. POSIX ¼¼¸¶Æ÷¾î (¿©±â¼´Â PSEM)´Â °í¼º´ÉÀÇ Áö¼ÓÀûÀÎ µ¿±âÈ ÀåÄ¡ÀÔ´Ï´Ù. PSEMÀº ÀϹÝÀûÀ¸·Î ´ÜÀÏ ÇÁ·Î¼¼½ºÀÇ ½º·¹µå °£ÀÇ µ¿±âÈ ¶Ç´Â °øÅë Á¶»óÀ¸·ÎºÎÅÍ PSEMÀ» »ó¼Ó ÇÑ °ü·Ã ÇÁ·Î¼¼½º ¼¼Æ® »çÀÌ¿¡¼ ÀϹÝÀûÀ¸·Î »ç¿ëµË´Ï´Ù. ¸í¸í µÈ PSEMÀº ÀϹÝÀûÀ¸·Î ÇÁ·Î¼¼½º °£ µ¿±âÈ¿¡ »ç¿ëµÇÁö¸¸ interthreaded designs.Synopsis »ç¿ë POSIX :: RT :: Semaphore; fcntlÀ» »ç¿ëÇϽʽÿÀ; # o_creat, o_exclÀ̶ó´Â À̸§ÀÇ ¼¼¸¶Æ÷¾î »ý¼º ## À̸§¾ø´Â ¼¼¸¶Æ÷¾î, Ãʱ⠰ª 1 $ sem = posix :: rt :: semaphore-> init (0, 1); ## ¸í¸í µÈ ¼¼¸¶Æ÷¾î, Ãʱ⠰ª 1 $ nsem = posix :: rt :: semaphore-> ¿±â ( "/ mysem", o_creat, 0660, 1); ## ¹æ¹ý ½Ã³ñ½Ã½º $ sem-> ±â´Ù¸²; # Down (P) ÀÛµ¿ ... º¸È£ ¼½¼Ç ... $ SEM-> °Ô½Ã¹°; # UP (v) ÀÛµ¿ ($ sem-> trywait) {# non-blocking ´ë±â (trydown) ... º¸È£ ¼½¼Ç ... $ sem-> °Ô½Ã¹°; } $ sem-> timedwait (time () + 10); # ÃÖ´ë 10 ÃʱîÁö ±â´Ù¸®½Ê½Ã¿À : ¡¤ Perl.
POSIX :: RT :: ¼¼¸¶Æ÷¾î °ü·Ã ¼ÒÇÁÆ®¿þ¾î