DBI::Library::Database - Database interface for CGI::CMS::GUI
use DBI::Library::Database;
my %message = ( thread => $thread, title => $headline, body => $body, thread => $thread, cat => $cat, attach => $sra, format => $format, id => $id, user => $user, attach => $filename, ip => remote_addr(), ); addMessage(\%message);
my %message = ( thread => $thread, title => $headline, body => $body, thread => $thread, cat => $cat, attach => $sra, format => $format, id => $id, user => $user, attach => $filename, ip => remote_addr(), ); editMessage(\%message);
my %reply =( title => $headline, body => $body, id => $reply, user => $user, attach => $sra, format => $html, ip => remote_addr(), ); reply(\%reply);
$bool = $database->deleteMessage($table,$id);
@menu = $database->readMenu($thread,$right,$von,$bis,$rewrite);
$rss = $database->rss($thread,int start);
$name = $database->getName($sid);
$sidid = $database->setSid(name,pass);
$bool = $database->checkSession($user,$sid);
$hashref = $database->getAction($action);
$right = right($action,$username);
userright(user);
topicright(id);
catright(name); todo rekursiv fetch subcat
createMenu(name);
isMember($user);
checkt ob es den user bereits gibt.
hasAcount($email)
checkt ob es die email Adresse bereits gibt.
$database->addUser(user, pass);
enable or disable rewrite.
set serverName.
set floodtime.
searchDB($query,$spalte,$table);
regexp suche in tabelle ...
@messages = fulltext(query,table);
fulltextsuche in tabelle ...
checked wann die letzte aktion der ip adresse war und erlaubt sie nur wenn midestens time zeit zur letzen aktion vergangen ist.
checkFlood(ip,optionaler abstand in sekunden )
checkFlood(remote_addr());
Dirk Lindner <lze@cpan.org>
Copyright (C) 2006-2008 by Hr. Dirk Lindner
This program is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details.
To install CGI::CMS, copy and paste the appropriate command in to your terminal.
cpanm
cpanm CGI::CMS
CPAN shell
perl -MCPAN -e shell install CGI::CMS
For more information on module installation, please visit the detailed CPAN module installation guide.