TIE :: ARRAY :: QUEUEEEXPIRE

Bind een array over een Tokyocabinet Btree DB
Download nu

TIE :: ARRAY :: QUEUEEEXPIRE Rangschikking & Samenvatting

Advertentie

  • Rating:
  • 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