| ±¸¼º :: ·¹ÄÚµå ±¸¼º :: ·¹ÄÚµå´Â ±¸¼º ÆÄÀÏ ¾×¼¼½º°¡ÀÖ´Â PERL ¸ðµâÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
±¸¼º :: ·¹ÄÚµå ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Daniel Berrange
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~danberr/Config-Record-1.1.2/lib/Config/Record.pod
±¸¼º :: ·¹ÄÚµå ű×
±¸¼º :: ·¹ÄÚµå ¼³¸í
config :: Record´Â ±¸¼º ÆÄÀÏ ¾×¼¼½º°¡ÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù. ½Ã³ñ½Ã½º´Â config :: ·¹Äڵ带 »ç¿ëÇÕ´Ï´Ù. # ºó ·¹Äڵ带 ¸¸µé°í ÆÄÀÏ¿¡¼·ÎµåÇϽʽÿÀ $ config = config :: ·¹ÄÚµå -> new (); $ config-> load ( "/ etc / myApp.cfg"); # create and load, filename ³» $ config = config :: ·¹ÄÚµå -> »õ (file => "/etc/myapp.cfg"); $ config-> ÀúÀå ( "/ etc / myApp.cfg"); # FileHandle¿¡¼·Îµå / ÀúÀå My $ FH = IO :: File-> New ( "/ etc / etc / myApp.cfg"); $ config = config :: ·¹ÄÚµå -> »õ (file => $ fh); $ config-> ÀúÀå ($ FH); # ±¸¼º °ª °¡Á®¿À°í, ³» $ value = $ config-> get ( "foo")¸¦ ãÀ» ¼ö¾ø´Â °æ¿ì ¿À·ù¸¦ ¹ß»ý ½ÃÅ°½Ê½Ã¿À. # ±¸¼º °ªÀ» ¾òÀ¸·Á¸é $ Value = $ config-> get ( "foo", "eek")¸¦ ãÀ» ¼ö¾ø´Â °æ¿ì 'eek'¸¦ µ¹·ÁÁÝ´Ï´Ù. # °ª $ config-> ¼¼Æ® ( "foobar", "wizz")¸¦ ¼³Á¤ÇϽʽÿÀ. # µö ±¸¼º °ª (Áï, Áßø ÇؽÃ) ³» $ VALUE = $ config-> get ( "foo / bar", "eek"); # Array Param My $ Value = $ config-> get ( "people / / forename")ÀÇ Ã¹ ¹ø° ¿ä¼Ò °¡Á® ¿À±â; # $ RECORD = $ config-> record () ·¹Äڵ带 ±¸¼ºÇÏ´Â ¿ø½Ã Çؽà ÂüÁ¶¸¦ °¡Á®¿É´Ï´Ù. # sub-hash my $ config = $ config-> view ( "foo")¿¡¼ ·çÆ® µÈ »õ CONFIG °´Ã¼¸¦ ¾ò½À´Ï´Ù.ÀÌ ¸ðµâÀº °£´ÜÇÑ ±¸¼º ÆÄÀÏ ·¹Äڵ带·ÎµåÇÏ°í ÀúÀåÇÏ´Â API¸¦ Á¦°øÇÕ´Ï´Ù. ±¸¼º ÆÄÀÏÀÇ Ç׸ñÀº ±âº»ÀûÀ¸·Î Å°¿Í °ªÀÌ ´ÜÀÏ µ¿ÀÏÇÑ ±âÈ£·Î ±¸ºÐ µÈ Å°¿Í °ªÀ» »ç¿ëÇÕ´Ï´Ù. Å°´Â ¿µ¼ýÀÚ¸¸À¸·Î ±¸¼ºµË´Ï´Ù. 3 °¡Áö À¯ÇüÀÇ °ªÀÌ ÀÖÀ¸¸ç ½ºÄ®¶ó °ªÀº ´º¶óÀÎÀ» Á¦¿ÜÇÑ ¸ðµç °ÍÀ» Æ÷ÇÔ ÇÒ ¼ö ÀÖ½À´Ï´Ù. °ªÀÌ Å« µû¿ÈÇ¥·Î µÑ·¯½ÎÀÌÁö ¾Ê´Â ÇÑ Æ®·¹ÀÏ ¸µ °ø¹éÀÌ ¼ÕÁúµË´Ï´Ù. ¿¹ : foo = wizz foo = "wizz ...."±ä ÁÙÀº ´º ¶óÀÎÀ» µµÀÔÇÏÁö ¾Ê°í ¹é ½½·¡½Ã ¹®ÀÚ·Î ºÐÇÒ µÉ ¼ö ÀÖ½À´Ï´Ù. Å« µû¿ÈÇ¥°¡ ¾øÀ¸¸é, ¼±ÀÇ ½ÃÀÛ°ú ³¡¿¡ °ø¹éÀÌ Æ®¸®¹ÖµË´Ï´Ù. ¿¹ : foo =.
±¸¼º :: ·¹ÄÚµå °ü·Ã ¼ÒÇÁÆ®¿þ¾î