#!/usr/bin/perl
# $Id: formredir,v 1.2 2001/02/08 13:29:26 stes Exp $

$IPMENU=$ENV{'IPMENU'};
require "$IPMENU/ipmenu.lib";

$flag=$ARGV[0];
$chain=$ARGV[1];
$num=$ARGV[2];

$form="$TMP/Form.$$";
formredir($form,$flag,$chain,$num);
print "open $form\n";

