HASH :: COMPACT Een hash-gebaseerde objectimplementatie met belangrijke alias en standaardwaardeondersteuning
Download nu

HASH :: COMPACT Rangschikking & Samenvatting

HASH :: COMPACT Tags

Perl-module perl object hash-based -Hash gebaseerde object waarde steun

HASH :: COMPACT Beschrijving

Een hash-gebaseerde objectimplementatie met belangrijke alias en standaardwaardeondersteuning Wanneer we een gestructureerde waarde opslaan in een kolom van een relationele database of een sleutel / waardeopslag, kan redundantie van lange-sleutelnamen een probleem zijn voor opslagruimte. Hash :: Compact is een PERL-module, maar nog een andere implementatie op basis van HASH Streeft ernaar op de hoogte te zijn van zowel ruimte-efficiëntie als gemak om voor ons te gebruiken. Synopsis-pakket Mijn :: MEMCACHED; strikt gebruik; gebruik waarschuwingen; Gebruik de ouder QW (Cache :: MEMCACHED :: SNEL); gebruik JSON; Gebruik Hash :: Compact; Mijn $ opties = {foo => {alias_for => 'f',}, bar => {alias_for => 'b', standaard => 'bar',},}; Sub Get {My ($ Self, $ Key) = @_; My $ value = $ self-> super :: krijgen (sleutel); HASH :: COMPACT-> NIEUWE (DECODE_JSON $ VALUE, $ OPTIES); } Subset {mijn ($ zelf, $ sleutel, $ waarde, $ afloop) = @_; mijn $ hash = hash :: compact-> nieuwe ($ waarde, $ opties); $ self-> super :: set ($ sleutel, EncOde_json $ hash-> to_hash, $ afloop); } Pakketnaam; strikt gebruik; gebruik waarschuwingen; Gebruik Test :: MEER; mijn $ key = 'sleutel'; mijn $ -waarde = {foo => 'foo'}; Mijn $ MEMD = MY :: MEMCACHED-> NIEUW ({Servers => }); $ memd-> set ($ sleutel, $ waarde); mijn $ cached_value = $ memd-> krijgen ($ sleutel); is_deeply $ cached_value-> param ('foo'), 'foo'; is_deeply $ cached_value-> param ('bar'), 'bar'; is_deeply $ cached_value-> to_hash, + {f => 'foo'}; $ cached_value-> param (bar => 'baz'); $ MEMD-> SET ($ KEY, $ CACHED_VALUE-> TO_HASH); $ cached_value = $ memd-> krijgen ($ sleutel); is_deeply $ cached_value-> param ('foo'), 'foo'; is_deeply $ cached_value-> param ('bar'), 'baz'; is_deeply $ cached_value-> to_hash, + {f => 'foo', b => 'baz'}; gedaan_testing; Vereisten: · Perl

HASH :: COMPACT Gerelateerde software