You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
23 lines
502 B
23 lines
502 B
4 months ago
|
#!/usr/bin/perl
|
||
|
|
#
|
||
|
|
# $Id: bugpostrpt.pl,v 1.3 2006/01/23 21:39:30 ddoughty Exp $
|
||
|
|
#
|
||
|
|
# Source File: bugpostrpt.pl
|
||
|
|
|
||
|
|
# Get config
|
||
|
|
require 'bugsitecfg.pl';
|
||
|
|
|
||
|
|
&app_initialize;
|
||
|
|
|
||
|
|
print "Content-Type: text/html\n\n";
|
||
|
|
|
||
|
|
$REPORT{'reportno'}=$FORM{'reportno'};
|
||
|
|
$REPORT{'submittedby'}=$FORM{'submittedby'};
|
||
|
|
$REPORT{'status'}=$FORM{'status'};
|
||
|
|
$REPORT{'title'}=$FORM{'title'};
|
||
|
|
$REPORT{'desc'}=$FORM{'desc'};
|
||
|
|
$REPORT{'adddtl'}=$FORM{'adddtl'};
|
||
|
|
$REPORT{'fix'}=$FORM{'fix'};
|
||
|
|
&put_report($FORM{'reportno'});
|
||
|
|
&show_detail();
|