sub setup {
  my $self = shift;
  my $cgi  = $self->query();

  $self->start_mode( $cgi->request_method() );

  $self->run_modes(
    'PUT'       => 'update',
    'GET'       => 'retrieve',
    'POST'      => 'create',
    'DELETE'    => 'delete',
  );
}