use Cache::File;
my $cache = Cache::File->new(
  cache_root        => '/tmp/mycache',
  default_expires   => '30 min',
);

my $ua = Net::Amazon->new(
   token => '0AQN5ZBDW6NXV9M60N82',
   cache => $cache,
);