use Modul;
my $dbc = new Modul('evtl. Filename woher es die Daten lesen soll');
my $dbh = DBI->connect(
  $dbc->dsn(qw/host_key database/),   # gibt z.B. 'dbi:mysql:database:127.0.0.1' zurück
  $dbc->ident(qw/connect_key uid pwd/),   # gibt Benutzername und Paßwort zurück
  { RaiseError => ...
  },
);