my $logfile = "/tmp/sybase_wrapper_xlog_$callerfile";
 Log::Log4perl::init(\ qq{
	log4perl.logger.DBIx.Log4perl = DEBUG, A1
        log4perl.appender.A1          = Log::Log4perl::Appender::File
        log4perl.appender.A1.filename = $logfile
        log4perl.appender.A1.mode     = append
        log4perl.appender.A1.layout   = Log::Log4perl::Layout::PatternLayout
        log4perl.appender.A1.layout.ConversionPattern=%d [%r] %P %C %p> %H:%F{1}:%L %M - %m%n
 });