#!/usr/bin/perl

use strict;
use warnings;

use Data::Dumper;
use Class::DBI::Loader;

my $loader = Class::DBI::Loader->new(
  dsn       => "dbi:mysql:cdbi",
  user      => "webdev",
  password  => "secret",
  namespace => "Data",
);

print Dumper Data::mitarbeiter->retrieve_all;