#!/usr/bin/perl

use strict;
use warnings;

use File::Basename;
use FindBin;

use lib dirname($FindBin::Bin) . "/modules";

use DLDtest;

my ($dlid,@dlfiles) = dld_initialize("lic_file", "123456", 5, "/path/to/data/files");

exit 0;