use lib "/usr/home/sz/myperl";
use DBI;