# concise class definitions
FooBar->table('foobar');
FooBar->has_many(frobs => "Quux");
Quux->table('quux')

#and a method on this FooBar instance...
$wham->frobs
#makes the (oversimplified SQL query)
#  SELECT * FROM quux WHERE FooBar = $wham

##</code><code>##

FooBar->has_many(frobs => "Quux", 'foobar_id');

$wham->frobs
# makes the (oversimplified SQL query)
#  SELECT * FROM quux WHERE foobar_id = $wham