1234567891011 use strict;use lib 't/lib';use libmemcached_test;use Test::More;my $cache = libmemcached_test_create({ min_version => '1.2.4' });plan tests => 1;$cache->set("foo", "abc");$cache->prepend("foo", "0123");is($cache->get("foo"), "0123abc");
use
strict;
lib
't/lib'
;
libmemcached_test;
Test::More;
my
$cache
= libmemcached_test_create({
min_version
=>
'1.2.4'
});
plan
tests
=> 1;
->set(
"foo"
,
"abc"
);
->prepend(
"0123"
is(
->get(
),
"0123abc"