use base 'CGI::Application';
use CGI::Application::Plugin::Config::Simple;

sub cgiapp_init {
   my $self = shift;
   $self->config_file('/usr/home/foobar/.dsadmin.conf');
}

sub cgiapp_prerun {
   my $self = shift;
   $query = $self->query();
   $subscriber_id = $query->param('id');

   $password => $self->config_param('s_pass'),
   $username => $self->config_param('s_user'),
   $dsn      => $self->config_param('s_dsn'),
}