#!/usr/bin/perl -w

# $Id: component_request.pl,v 1.1 1996/01/17 04:54:08 hoagland Exp $

# tw_request.pl, by Jim Hoagland (hoagland@cs) 1/96

# this program generates the tripwire request page for the ARPA IDS demo GUI
# may be executed as a CGI script or execed by a program
# outputs HTML to STDOUT

require 5.000;

require '/pkg/www/arpa/secret/cgi-bin/gui-helper.pl';
require '/pkg/www/arpa/secret/cgi-bin/draw_component_request.pl';

umask 000;

$state= State->new(&get_statefile);

#-------------

&draw_component_request($state);

1;