Current File : //home/rs/perl/mysql/lib/perl5/5.8/mach/auto/Storable/store.al
# NOTE: Derived from ../../lib/Storable.pm.
# Changes made here will be lost when autosplit is run again.
# See AutoSplit.pm.
package Storable;
#line 200 "../../lib/Storable.pm (autosplit into ../../lib/auto/Storable/store.al)"
#
# store
#
# Store target object hierarchy, identified by a reference to its root.
# The stored object tree may later be retrieved to memory via retrieve.
# Returns undef if an I/O error occurred, in which case the file is
# removed.
#
sub store {
return _store(\&pstore, @_, 0);
}
# end of Storable::store
1;
Mini Shell