Cache::NullCache - implements the Cache interface.

Cache-Cache documentation Contained in the Cache-Cache distribution.

Index

Code Index:

NAME

Top

Cache::NullCache -- implements the Cache interface.

DESCRIPTION

Top

The NullCache class implements the Cache::Cache interface, but does not actually persist data. This is useful when developing and debugging a system and you wish to easily turn off caching. As a result, all calls to get and get_object will return undef.

SYNOPSIS

Top

  use Cache::NullCache;

  my $cache = new Cache::NullCache( );

  See Cache::Cache for the usage synopsis.

METHODS

Top

See Cache::Cache for the API documentation.

OPTIONS

Top

See Cache::Cache for standard options.

PROPERTIES

Top

See Cache::Cache for default properties.

SEE ALSO

Top

Cache::Cache

AUTHOR

Top

Original author: Jay Sachs

Last author: $Author: dclinton $

Copyright (C) 2001 Jay Sachs, 2002 DeWitt Clinton

Cache-Cache documentation Contained in the Cache-Cache distribution. 
######################################################################
# $Id: NullCache.pm,v 1.7 2002/07/18 06:15:18 dclinton Exp $
# Copyright (C) 2001 Jay Sachs, 2002 DeWitt Clinton All Rights Reserved
#
# Software distributed under the License is distributed on an "AS
# IS" basis, WITHOUT WARRANTY OF ANY KIND, either expressed or
# implied. See the License for the specific language governing
# rights and limitations under the License.
######################################################################


package Cache::NullCache;

use strict;
use vars qw( @ISA );
use Cache::BaseCache;
use Cache::Cache qw( $EXPIRES_NOW  );

@ISA = qw ( Cache::BaseCache );


sub Clear
{
}


sub Purge
{
}


sub Size
{
  return 0;
}


sub new
{
  my ( $proto ) = @_;

  return bless( {}, ref( $proto ) || $proto );
}


sub clear
{
}


sub get
{
  return undef;
}


sub get_object
{
  return undef;
}


sub purge
{
}


sub remove
{
}


sub set
{
}


sub set_object
{
}


sub size
{
  return 0;
}


sub get_default_expires_in
{
  return $EXPIRES_NOW;
}


sub get_keys
{
  return ( );
}


sub get_identifiers
{
  warn( "get_identifiers has been marked deprepricated.  use get_keys" );

  return ( );
}


sub get_auto_purge_interval
{
  return 0;
}


sub set_auto_purge_interval
{
}


sub get_auto_purge_on_set
{
  return 0;
}


sub set_auto_purge_on_set
{
}


sub get_auto_purge_on_get
{
  return 0;
}


sub set_auto_purge_on_get
{
}


__END__