Select Code to Download

__PACKAGE__->set_sql('update', <<"");
                UPDATE __TABLE__
                SET    %s
                WHERE  __IDENTIFIER__

sub my_sqlset
{
...
    # escape your statement here
    $self->set_sql($name,$statement);
}