TIE :: ARRAY :: QUEUEEEXPIREBind een array over een Tokyocabinet Btree DB | |
Download nu |
TIE :: ARRAY :: QUEUEEEXPIRE Rangschikking & Samenvatting
Advertentie
- Vergunning:
- Perl Artistic License
- Prijs:
- FREE
- Naam uitgever:
- Dulaunoy Fabrice
- Uitgever website:
- http://search.cpan.org/~fdulau/Tie-CountLoop-1.5/lib/Tie/CountLoop.pm
TIE :: ARRAY :: QUEUEEEXPIRE Tags
TIE :: ARRAY :: QUEUEEEXPIRE Beschrijving
Bind een array over een Tokyocabinet Btree DB TIE :: ARRAY :: QUEUEEEEXPIRE is een PERL-module die tijd nodig heeft :: Hires, Tokyocabinet (database en PERL-module.) De insertie is MSIAD (0.001 seconden). De normale array-functie aanwezig zijn push-pop-shift verlaat Scalar Clear UNSHIFT (maar zet gegevens 1 seconde vóór het eerste item) De volgende functie is niet volledig geïllustreerd. splice De volgende functie wordt niet geïmplementeerd. Extend Store Storesizethe De volgende functie zijn specifiek van deze module. Last First Expire Optimize Push Fetchsynopsis Gebruik TIE :: Array :: QueueExpire; Mijn $ t = tie (mijn @myarray, "TIE :: ARRAY :: QUEEEEEXPIRE", '/TMP/DB_TEST.BDB'); duw @myarray, int rand 1000; # Normale array-functie My $ Data = Shift @myarray; mijn $ gegevens = pop @myarray; Print "Deze elem bestaat "If (bestaat ($ myarray ); print" size = ". Scalaire (@myarray)." "; # met behulp van de push met een extra parameter om het nieuwe element in Futur # te plaatsen, retourneer ook de sleutel van de ingebrachte waarde voor (1 .. 10) {zeg" t = ". Tijd. ' '. Int (($ t-> push ($ _' ''. Tijd, 10)) / 1000); Slaap 1;} Slaap 10; # Krijg de verlopen elementen (7 seconden ervoor) My $ Ex = $ t -> Vervallen (7); # Krijg de verlopen elementen mijn @ @ @ @ {$ t-> aflopen ($ exp)}; # Get en verwijder de verlopen elementen (20 seconden ervoor) $ ex = $ t-> afloop (20, 1); mijn @ @ ek = @ {$ t-> verlopen ($ exp, 1)}; # fetch element # in scalaire context Retourneer de waarde # in array context Return in het eerste element De sleutel en in de tweede plaats de Waardeer mijn $ A = $ T-> fetch (6); mijn @b = $ t-> fetch (6); # De normale array halen is altijd in Scalaire modus mijn @ c = $ myarray ; zeg dumper ( $ A); zeg dumper (@B); zeg dumper (@c); vereisten: · Perl
TIE :: ARRAY :: QUEUEEEXPIRE Gerelateerde software