# 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