#!/usr/bin/perl

# poster.pl
# ---------

require 'vxcgi.pl';

cgi_vars();     # $id = pack id; $fs = full screen flag
$fs += 0;

if ($id  &&  -e "./ScreenThemes_Posters/poster_$id.jpg")
{
    cgi_redirect("http://www.screenthemes.com/gallery/viewjpg.pl?coll=ScreenThemes_Posters&file=poster_$id.jpg&fs=$fs");
}
else
{
    cgi_redirect("http://www.screenthemes.com/gallery/viewcoll.pl?coll=ScreenThemes_Posters");
}