#!/usr/bin/perl

# home.cgi

#/usr/bin/suidperl ?

# Copyright (c) 2000, 2002 Jon Ferguson, All Rights Reserved
# $Id: main.cgi,v 1.5 2002/11/06 01:25:32 ferguson Exp $

# NOTICE: This is not a file sharing program.  Do not use this software to
# illegally share music. You assume all responsibility for how you
# choose to use this program. 

use lib "/usr/local/calliope/lib";

use strict;
use Web::Dispatch ();

# main
{
    &Web::Dispatch::dispatch();
}

exit;