--- sysplogd 2009/04/11 10:03:04 9 +++ sysplogd 2009/04/11 11:45:36 12 @@ -8,20 +8,23 @@ use DBI; use Getopt::Long; -my $port = 514; +our $port = 514; +our $MAXLEN = 1524; -my $MAXLEN = 1524; +our $dsn = 'DBI:Pg:dbname=syslog'; +our $user = 'dpavlin'; +our $log = '/tmp/sysplog.log'; + +require 'conf.pl' if -e 'conf.pl'; -my $dsn = 'DBI:Pg:dbname=syslog;host=llin.lan'; -my $user = 'dpavlin'; my $debug = 0; my $schema = 0; -my $log = '/tmp/sysplog.log'; GetOptions( 'debug+' => \$debug, 'schema!' => \$schema, 'log=s' => \$log, + 'port=i' => \$port, ) || die "usage: $0 --debug --schema\n"; our $VERSION = '0.00';