use DBIx::Recordset;

my %db_setup =
(
  '!DataSource'     => "DBI:mysql:$database_name:$url",
  '!Username'	 => $user,
  '!Password'	 	=> $password,
  '!Table'		=> 'users'    
);

*users = DBIx::Recordset->Setup(\%db_setup) or die "Couldn't connect to the database: $DBI::errstr.\n";