#!/usr/bin/perl use strict; use 5.10.1; use FindBin; use lib "$FindBin::Bin/../"; use lib "$FindBin::Bin/../DADA/perllib"; use lib "$FindBin::Bin/lib"; BEGIN { my $b__dir = ( getpwuid($>) )[7] . '/perl'; push @INC, $b__dir . '5/lib/perl5', $b__dir . '5/lib/perl5/x86_64-linux-thread-multi', $b__dir . 'lib', map { $b__dir . $_ } @INC; } #use Carp qw(croak carp); #use CGI::Carp qw(fatalsToBrowser); # -T flag stuff. $ENV{PATH} = "/bin:/usr/bin"; delete @ENV{ 'IFS', 'CDPATH', 'ENV', 'BASH_ENV' }; use DadaMailInstaller; my $installer = new DadaMailInstaller(); $installer->run();