#!/usr/bin/perl
# Example CGI script to run Blikistan
use strict;
use warnings;
use CGI qw/header/;
use Socialtext::Resting::Getopt qw/get_rester/;
use Blikistan;
print header();
my $r = get_rester( 'rester-config' => "$FindBin::Bin/.blog-rester" );
my $blikistan = Blikistan->new( rester => $r );
print $blikistan->print_blog;