NAME

Tie::Storable - Stores your object when untied via Storable

SYNOPSIS

use Tie::Storable;
{
    tie my $scalar => 'Tie::Storable', 'scalar.po';
    $scalar = 42;
} # scalar is automatically saved as 'scalar.po'.
{
    tie my @array => 'Tie::Storable', 'array.po';
    @array = qw(Sun Mon Tue Wed Fri Sat);
} # array is automatically saved as 'array.po'.
{
    tie my %hash => 'Tie::Storable', 'hash.po';
    %hash = (Sun=>0, Mon=>1, Tue=>2, Wed=>3, Thu=>4, Fri=>5, Sat=>6);
} # hash is automatically saved as 'hash.po'.
{
    tie my $object => 'Tie::Storable', 'object.po';
    $object = bless { First => 'Dan', Last => 'Kogai' }, 'DANKOGAI';
} # You can save an object; just pass a scalar
{
    tie my $object => 'Tie::Storable', 'object.po';
    $object->{WIFE} =  { First => 'Naomi', Last => 'Kogai' };
    # you can save before you untie like this
    tied($object)->save;
}

DESCRIPTION

Tie::Storable stores tied variables when untied. Usually that happens when you variable is out of scope. You can of course explicitly untie the variable or tied($variable)->save but the whole idea is not to forget to save it.

This module uses Storable as its backend so it can store and retrieve anything that Storable can.

SEE ALSO

Tie::SaveLater, Tie::Storable, Tie::YAML

perltie, Tie::Scalar, Tie::Array, Tie::Hash

AUTHOR

Dan Kogai, <dankogai@dan.co.jp>

COPYRIGHT AND LICENSE

Copyright (C) 2006 by Dan Kogai

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.8 or, at your option, any later version of Perl 5 you may have available.