saintex has asked for the wisdom of the Perl Monks concerning the following question:

Hello Moonks, how can I read some data stored with MLDBM and Storable?

I tried with:
use strict; use warnings; use Fcntl qw( LOCK_SH O_RDONLY O_CREAT O_RDWR ); use Storable qw(nstore store_fd nstore_fd freeze thaw dclone retrieve +); use DBM::Deep; use MLDBM qw(AnyDBM_File Storable); use Storable qw(retrieve_fd); use FindBin qw($Bin); my ($dbm, $key, $value, %o,$colref ); $dbm = tie %o, 'MLDBM', $Bin.'/mj-test-schedules', O_CREAT|O_RDWR, 064 +0 or die $!; use Data::Dumper; $Data::Dumper::Purity=1; print Dumper (%$dbm);

But without success, because I have the data not yet dumped, but in some other form:

Encountered CODE ref, using dummy placeholder at /usr/lib/perl/5.10/Da +ta/Dumper.pm line 190. $VAR1 = 'DB'; $VAR2 = bless( do{\(my $o = 33211984)}, 'AnyDBM_File' ); $VAR3 = 'SR'; $VAR4 = bless( { 'dumpmeth' => '', '_dumpsub_' => sub { "DUMMY" } }, 'MLDBM::Serializer::Storable' );


More information about my problem here.

Please, any suggestion is welcome!

Thank you!

Replies are listed 'Best First'.
Re: read a file with MLDBM
by marto (Cardinal) on Nov 22, 2010 at 17:54 UTC

    Regarding your link to your previous post, see the advice in Storable and MLDb ([id://872090]).

    Update: example of proper linking.