mtdb. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Mark Ralf Thomson
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~thomson/MTDB-0.1.0/lib/MTDB.pm
mtdb. ű×
mtdb. ¼³¸í
MTDB´Â ´ÙÂ÷¿ø Åõ¸í Çؽà µ¥ÀÌÅͺ£À̽ºÀÔ´Ï´Ù. MTDB´Â ´ÙÂ÷¿ø Åõ¸í Çؽà µ¥ÀÌÅͺ£À̽ºÀÔ´Ï´Ù .Synopsis # ÆÐÅ°Áö·Îµå MTDB QW ($ Serializer)¸¦ »ç¿ëÇϽʽÿÀ. # Çؽø¦ $ db = tie % ÇؽÃ, 'mtdb', ÆÄÀÏ => $ file, safer => 1; # µð½ºÅ©¿¡ ÀúÀå ¸ðµç º¯°æµÈ ·¹ÄÚµå $ DB-> sync (); # ¸ðµç ·¹ÄÚµå Å° °¡Á® ¿À±â @Array = Keys % ÇؽÃ; # ·¹Äڵ尡 Á¸ÀçÇÏ´ÂÁö È®ÀÎÇϽʽÿÀ $ Çؽà {$ foo}; $ bar = $ hash {$ foo}; $ bar -> {$ foobar}; # Çʵ带 ¾òÀ¸½Ê½Ã¿À $ bla = $ hash {$ Å°}; $ scalar = $ bla -> {$ key2} -> ; $ scalar = $ bla -> {$ key2} -> {$ key3}; # Çʵ忡 $ BLA -> {$ KEY2} -> {$ KEY3} = $ °ª; # mainhash $ Çؽà {$ Å°} = $ bla; # µð½ºÅ©¿¡ ÀúÀå $ db-> sync (); ¿ä±¸ »çÇ× : ¡¤ Perl.
mtdb. °ü·Ã ¼ÒÇÁÆ®¿þ¾î