NAME

Perlbug::Table - Table access

DESCRIPTION

Simple access to all database tables

USAGE

my $o_bug = $Perlbug::Table->new('BUG', 'ticketid');

print "Our table has ".$o_bug->columns." columns\n";
	
my $h_data = $o_bug->fetch($bug_id);

print "Bug subject: ->$$h_data{'subject'}<- \n";

METHODS

new

Call with table name

my $o_message = $Perlbug::Table->new('MESSAGE', 'primarykey');

If 'primarykey' is not given, it will be built from "ref($class).'ID'": no support for multiple column primary key combos, yet.