El Módulo DB_File

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