use strict;

$ARDB::DEBUG = 'on';

use ARDB;

my $ardb_object = new ARDB;

my $config     = $ardb_object -> {config};
my $sql_object = $ardb_object -> {sql_object};

foreach ( sort values %{$config -> {tables}} )
 {
  $_ -> perform_create ($sql_object);
 }

