$ perl holdcache.pl &

$ perl -e 'use Cache::SharedMemoryCache;$c=Cache::SharedMemoryCache->new({namespace=>"MyNamespace"}) or die;$c->set("foo",1);'

$ perl -e 'use Cache::SharedMemoryCache;$c=Cache::SharedMemoryCache->new({namespace=>"MyNamespace"}) or die;$x=$c->get("foo");print $x,$/'
1