Tie::Storable - Stores your object when untied via Storable
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; }
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.
tied($variable)->save
This module uses Storable as its backend so it can store and retrieve anything that Storable can.
Tie::SaveLater, Tie::Storable, Tie::YAML
perltie, Tie::Scalar, Tie::Array, Tie::Hash
Dan Kogai, <dankogai@dan.co.jp>
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.
To install Tie::SaveLater, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Tie::SaveLater
CPAN shell
perl -MCPAN -e shell install Tie::SaveLater
For more information on module installation, please visit the detailed CPAN module installation guide.