__PACKAGE__->add_trigger( after_create => sub {
  my ($self) = @_;
  print  "ID = '$self->{textanswer_id}', Answer = '$self->{answer} <br />";
});

__PACKAGE__->add_trigger( before_create => sub {
  my ($self) = @_;
  print "ID = '$self->{textanswer_id}', Answer = '$self->{answer} <br />";
});

__PACKAGE__->add_trigger( before_update => sub {
  my ($self) = @_;
  print "About to update album, '$self->{answer} <br />";
});

__PACKAGE__->add_trigger( after_update => sub {
  my ($self) = @_;
  print "Finished updating album '$self->{answer} <br />";
});