Use of uninitialized value in array dereference at (eval 20) line 15 (#1)
    
(W uninitialized) An undefined value was used as if it
were already defined.  It was interpreted as a "" or a 0,
but maybe it was a mistake.  To suppress this
warning assign a defined value to your variables.

Use of uninitialized value in array dereference at (eval 20) line 15.
Use of uninitialized value in array dereference at (eval 20) line 16 (#1)
Use of uninitialized value in array dereference at (eval 20) line 16.
Use of uninitialized value in array dereference at (eval 20) line 22 (#1)
Use of uninitialized value in array dereference at (eval 20) line 22.
Use of uninitialized value in array dereference at (eval 20) line 22.
Use of uninitialized value in array dereference at (eval 20) line 22.

##</code><code>##


#!/usr/local/bin/perl

use DBI;
use CGI qw/:standard/;
use CGI::Carp qw(fatalsToBrowser);
use diagnostics;
use warnings;

$fcolor           = 'blue';
$bgcolor          = '#FFFFFF';
$ENV{ORACLE_HOME} = '/path/to/orahome';
$base             = 's/omedir';
$log              = 'logfile';

%labels = (issue            => 'Issue',
	   reported_by      => 'Reported By',
	   date_occurred    => 'Date Occurred',
	   one_line_summary => 'One Line Summary',
	   time_lost        => 'Time Lost',
           response         => 'Response',
	   fix_status       => 'Fix Status',
	   fix_time         => 'Fix Time',
	   category         => 'Category',
           date_range       => 'Date Range');