my $dsn = 'dbi:Oracle:host=10.1.1.100;sid=XX;port=1521';