#!/usr/bin/perl -w

# Packages
use strict;
use warnings;
use BerkeleyDB;
use BerkeleyDB::Env

# Some values
my $filename="saltbd_a";
my $db_aux;
my $env;
my $ref;

# Preparing environment
$env = new BerkeleyDB::Env;

# Open Database
$db_aux = new BerkeleyDB::Btree -Filename =>$filename;

$env = new BerkeleyDB::Env:
$env = $db_aux->Env();



