__PACKAGE__->set_sql('update', <<""); UPDATE __TABLE__ SET %s WHERE __IDENTIFIER__ #### sub my_sqlset { my ($self,$name,$statement) = @_; # escape your statement here $self->set_sql($name,$statement); }