#!/usr/local/bin/perl -w use strict; use Cache::Memcached; my $a = new Cache::Memcached { servers => [ "127.0.0.1:11211", "127.0.0.1:11212", ], }; $a->get_multi(("ad_formats")); $a->get_multi("ad_formats2"); print "Done!\n";