Una alternativa a dbmopen es usar el módulo DB_File . El siguiente ejemplo muestra como usarlo:
$ cat -n testdbfile.pl 1 #!/usr/local/bin/perl -w 2 use strict; 3 use DB_File; 4 my $file = shift || 'test'; 5 my %h; 6 tie (%h, 'DB_File', $file) or die $!; 7 8 $h{abc} = "ABC"; $h{def} = "DEF"; $h{ghi} = "GHI"; 9 untie (%h); 10 11 my %g; 12 tie (%g, 'DB_File', $file) or die $!; 13 14 print "$_ => $g{$_}\n" for keys %g; 15 16 untie(%g);
al ejecutar se obtiene:
$ testdbfile.pl abc => ABC ghi => GHI def => DEF
Casiano Rodríguez León