my $connection_check = DBI->connect( 'DBI:Oracle:'.$current_db, $current_user, $current_password, { RaiseError=> 0, PrintError => 0, AutoCommit => 0 } );
	if ( defined $connection_check)
	{
		print "Verbindung OK";
	}
	else
	{
		print "Verbindung NICHT OK";
	}