use constant database => "Repairs";       #the database name
use constant hostname => "192.168.1.111"; #MySQL server IP address
use constant port     => '3306';          #MySQL port

##</code><code>##

#!/usr/bin/perl -w
use strict;

my $STDOUT_TOP= <<END_TOP;
ID         First Name Last Name    Email Address      Phone Number Date       Comp. Manufacturer Comp. Model Model Number OS 
========== ========== ============ ================   ============ === ======= ================== =========== ============ =============
END_TOP

print $STDOUT_TOP;