Cache :: MEMCACHED :: schnell Perl-Client für Memcached, in C-Sprache
Jetzt downloaden

Cache :: MEMCACHED :: schnell Ranking & Zusammenfassung

Cache :: MEMCACHED :: schnell Stichworte

Perl-Modul Perl Zwischenspeicher Memcached. Memcached Client

Cache :: MEMCACHED :: schnell Beschreibung

Perl-Client für Memcached, in C-Sprache Cache :: Memcahced :: Schnell ist ein Perl-Modul für Memcached, einen Speicher-Cache-Daemon (http://www.danga.com/memcached/). Modulkern ist in C implementiert und ist bemüht, Anzahl der Systemaufrufe zu minimieren und einen Schlüssel / Wert zu vermeiden, für die Geschwindigkeit zu kopieren. Als Ergebnis hat es sehr niedrige CPU consumption.API mit Cache :: Memcached, ursprünglich reinen Perl-Client, die meisten Benutzer des ursprünglichen Modul dieses Modul kann beginnen weitgehend kompatibel ist es durch die Installation und das Hinzufügen von :: Fast zur alten Name in ihren Skripte (siehe "Kompatibilität mit Cache :: Memcached" unten für weitere Informationen) .SYNOPSIS Verwendung Cache :: Memcached :: Schnell; my $ memd = new Cache :: Memcached :: Fast ({Server => , namespace => 'my:' connect_timeout => 0,2, io_timeout => 0,5, close_on_error => 1, compress_threshold => 100_000, compress_ratio => 0,9, compress_methods => , max_failures => 3, failure_timeout => 2, ketama_points => 150, nowait => 1, hash_namespace => 1, serialize_methods => utf8 => ($ ^ V ge v5.8.11: 0), max_size => 512 * 1024,}); # Server-Versionen holen. my $ Versionen = $ memd-> server_versions; while (my ($ Server $ version) = each% $ Versionen) {# ...} # Shop Skalare. $ Memd-> add ( 'skey', 'Text'); $ Memd-> add_multi ( ); $ Memd-> ersetzen ( 'skey', 'val'); $ Memd-> replace_multi ( ); $ Memd-> set ( 'nKey', 5); $ Memd-> set_multi (, ); # Shop beliebige Perl-Datenstrukturen. my% hash = (a => 1, b => 2); Mein @liste = (1, 2); $ Memd-> Set ( 'hash', \% hash); $ Memd-> set_multi (, ); # In den Saiten. $ Memd-> prepend ( 'skey', 'Dies ist eine'); $ Memd-> prepend_multi ( ); $ Memd-> append ( 'skey', 'ue.'); $ Memd-> append_multi ( ); # Rechnen. $ Memd-> incr ( 'nKey', 10); drucken OK "If $ memd-> decr ( 'nKey', 3) == 12; mein @counters = qw (c1 c2); $ memd-> set_multi (Karte {} @counters, 'c3', 'c4'); $ memd-> incr_multi (, @counters, .), # abrufen Werte my $ val = $ memd-> get ( 'skey'); drucken OK "If $ val eq 'Dies ist ein Wert.'; My $ href = $ memd-> get_multi ( 'hash', 'nKey'); print" OK "If $ href -> {hash} -> {b} == 2 und $ href -> {nKey} == 12;. # Haben Atomtest-and-Set-Operationen my $ cas_val = $ memd-> wird ( nKey '); $$ cas_val = 0, wenn $$ cas_val == 12; if ($ memd-> cas (' nKey, @ $ cas_val)) {OK drucken, Wert aktualisiert ";} Else {print "Update fehlgeschlagen, wahrscheinlich einen anderen Client den Wert aktualisiert hat"." ;} # Einige Daten löschen $ memd-> löschen ( 'skey.'); Mein @keys = qw (k1 k2 k3); $ memd-> delete_multi (@keys, ); # Warten für alle Befehle, die in nowait-Modus ausgeführt wurden $ memd-> nowait_push; # alle zwischengespeicherten Daten Wipe out $ memd-> flush_all; Anforderungen..: · Perl.

Cache :: MEMCACHED :: schnell Zugehörige Software