| DB :: GTM. DB :: GTMÀº GT.M Àü¿ª µ¥ÀÌÅÍ¿Í ÀÎÅÍÆäÀ̽º ÇÒ PERL È®ÀåÀÚÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
DB :: GTM. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~szeck/Db-GTM-1.27/GTM.pm
DB :: GTM. ű×
DB :: GTM. ¼³¸í
DB :: GTMÀº GT.M Àü¿ª µ¥ÀÌÅÍ¿Í ÀÎÅÍÆäÀ̽º ÇÒ PERL È®ÀåÀÚÀÔ´Ï´Ù. DB :: GTMÀº gt.m Global Data.Snopsis¿ÍÀÇ ÀÎÅÍÆäÀ̽º¿¡ ´ëÇÑ Perl È®ÀåÀÚÀÔ´Ï´Ù. DB :: GTM; MY ($ db) = »õ·Î¿î gtmdb ( "spz"); # ³ëµå¿¡ ¿¬°áÇϱâ # ±âº» µ¥ÀÌÅͺ£À̽º ³ëµå ÀúÀå¼Ò / °Ë»ö $ DB-> ¼¼Æ® (1000); # ³ëµå = 1000 $ DB-> ¼¼Æ® ( "foo", 50)¸¦ ¼³Á¤ÇÕ´Ï´Ù. # ³ëµå = 50 $ db-> ¼¼Æ® ( "foo", 6,1012); # ³ëµå = 1012 $ db-> ¼¼Æ® ( "foo", 9, $$); # ³ëµå = pid $ db-> set ( "foo", 6, "bar", 5); # ³ëµå = 5 $ db-> get ( "foo", 6); # µ¥ÀÌÅͺ£À̽º $ db-> ´ÙÀ½ ( "foo", 6)À» ÅëÇØ ¹Ýº¹ÇؾßÇÕ´Ï´Ù. # scalar 9 $ db-> prev ( "foo", 9); # scalar 6 $ db-> prev ( "foo", 6); # undefined $ db-> ¾î¸°ÀÌ ( "foo") ¿©¾ßÇÕ´Ï´Ù. # ´ÙÀ½ÀÌ ÀÖ¾î¾ßÇÕ´Ï´Ù. (6,9) $ DB-> Äõ¸® ( "foo", 6); # ´ÙÀ½ÀÌ ÀÖ¾î¾ßÇÕ´Ï´Ù : ( "foo", 6, "bar"); # ³ëµå¸¦ º¹»ç $ DB-> º´ÇÕ ( "foo", 6, undef, "foo", 12); # ¹× $ db-> clobber ( "foo", 6, undef, "foo", 12); # over # # ³ëµå »èÁ¦ $ db-> kill ( "foo", 6); # ³ëµå # ¹× $ db-> kv ( "foo", 12); # node $ db-> ks ( "foo", 12); # node [ "spz", "foo", 12, "bar"# ¹× ´Ù¸¥ ÷ÀÚ ... ¿ä±¸ »çÇ× : ¡¤ Perl.
DB :: GTM. °ü·Ã ¼ÒÇÁÆ®¿þ¾î