my $dbcon = DBI->connect('dbi:mysql:database', 'root', '')
        or die "Couldn't connect to database: " . DBI->errstr;