#!/usr/local/bin/perl
use MyAuth; ## has strict, warnings, etc.
my $webapp = MyAuth->new(
      PARAMS => { 'Next_CGI' => "some_url_without_query_string" }
);
$webapp->run();