#!/usr/bin/perl
# thisStringIndicatesFileIsAutoGenerated

use O2::Cgi;
use O2::Frontend::Dispatch;

my $url = "http://$ENV{HTTP_HOST}$ENV{SCRIPT_NAME}";
$url =~ s{ index[.]cgi \z }{}xms;

my $cgi = O2::Cgi->new();
my $dispatch = O2::Frontend::Dispatch->new();
$dispatch->dispatch(isPublisherRequest=>1, url=>$url);

$cgi->output();