Select Code to Download

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

sub teardown()
   my $self = shift;
...
   }
   return $output;
}