Store hashes in a DBM file: : DBM « Database « Perl

1.	Array
2.	CGI
3.	Class
4.	Data Type
5.	Database
6.	File
7.	GUI
8.	Hash
9.	Language Basics
10.	Network
11.	Regular Expression
12.	Report
13.	Statement
14.	String
15.	Subroutine
16.	System Functions
17.	Win32
18.	XML

Perl » Database » DBM

Store hashes in a DBM file:

   



#!/usr/bin/perl

use warnings;

use strict;

use POSIX;



use SDBM_File;

use Storable;

my %dbm;

my $db_file="demo.dbm";

tie %dbm, 'SDBM_File', $db_file, O_CREAT|O_RDWR, 0644;



$dbm{'key'}=Storable::freeze({Name=>"John", Value=>"Smith", Age=>"42"});



my $href=Storable::thaw($dbm{'key'});

my %hash=%{ Storable::thaw($dbm{'key'}) };

Related examples in the same category

1.	Creating and Assigning Data to a DBM File
2.	Open DBM up for read write access
3.	Opening an MLDBM database is similar to opening a regular DBM database:
4.	Reads DBM file, printing entries with tie and untie function
5.	Using DBM databases with reports
6.	Write out data into a DBM database
7.	Copying from One DBM Format to Another

java2s.com | Contact Us | Privacy Policy

All other trademarks are property of their respective owners.