# NOTE: Derived from ..\..\lib\Storable.pm. # Changes made here will be lost when autosplit is run again. # See AutoSplit.pm. package Storable; #line 345 "..\..\lib\Storable.pm (autosplit into ..\..\lib\auto\Storable\retrieve.al)" # # retrieve # # Retrieve object hierarchy from disk, returning a reference to the root # object of that tree. # sub retrieve { _retrieve($_[0], 0); } # end of Storable::retrieve 1;