use strict;
use warnings;

use Data::Dumper;
use Cache::Memcached;

my $CACHE = new Cache::Memcached( { servers => [ "myremotecache.com:11211" ] })
    or die "$! / $^E"; 

print Dumper($CACHE->stats());