Select Code to Download

# set up the database connection variables

...
$db_host = 'localhost';
$db_database = 'adb';
$db_table = 'notactual';

#!/usr/bin/perl -w
 
...
print $db_host;
print $db_database;
print $db_table;

Use of uninitialized value in print at ocrgqx_audit_report.pl line 30 
+(#1)
    (W uninitialized) An undefined value was used as if it were alread
+y
    defined.  It was interpreted as a "" or a 0, but maybe it was a mi
+stake.
    To suppress this warning assign a defined value to your variables.