# Program 1
use Cache::FileCache;

my $cache = new Cache::FileCache({ 'namespace' => 'SharedCache', 'default_expires_in' => 600 } );

my $passed_data = "This is a passed string";

$cache->set( "Data", $passed_data, "10 minutes" );