document and test redis object for issuing normal commands

[perl-Redis.git] / lib / Redis / Hash.pm

diff --git a/lib/Redis/Hash.pm b/lib/Redis/Hash.pm
index e5f8f70..d85e71f 100644 (file)
--- a/lib/Redis/Hash.pm
+++ b/lib/Redis/Hash.pm
@@ -16,6 +16,9 @@ Redis::Hash - tie perl hashes into Redis
 
   tie %name, 'Redis::Hash', 'prefix';
 
+  my $o = tie %foobar, 'Redis::Hash', 'foobar';
+  print $o->info->{used_memory}; # or any redis command
+
 =cut
 
 # mandatory methods