#!/usr/local/bin/perl # ================================================================== # Gossamer Links - enhanced directory management system # # Website : http://gossamer-threads.com/ # Support : http://gossamer-threads.com/scripts/support/ # CVS Info : 087,068,085,094,083 # Revision : $Id: page.cgi,v 1.39 2005/03/22 08:18:05 jagerman Exp $ # # Copyright (c) 2001 Gossamer Threads Inc. All Rights Reserved. # Redistribution in part or in whole strictly prohibited. Please # see LICENSE file for full details. # ================================================================== use strict; use lib '/kunden/uclick.de/td/cgi-bin/admin'; use Links qw/$PLG/; use Links::User::Page; local $SIG{__DIE__} = \&Links::fatal; Links::init('/kunden/uclick.de/td/cgi-bin/admin'); Links::init_user(); if ($PLG->dispatch('check_request', \&Links::check_request)) { $PLG->dispatch('handle_page', \&Links::User::Page::handle); }