my $self = DBI->connect($dsn, $user, $pass, $attributes) or die $DBI::errstr;