use DBI;
use Spreadsheet::WriteExcel;
use Spreadsheet::WriteExcel::Styler;

my ($DBName, $DBUID, $DBPWD) = ("MyDatabase", "reportAccount", "tehRptP@55werd");
. . . add a few lines here to define my favorite excel styles . . .