Foo::Bar->set_sql(withlimit => q{
   select * from table
   where field = ?
   limit ?
});