use FindBin;
use lib "$FindBin/../data";
use dbinfo;