You've shown a lot of things here that are irrelevant.

Produce code for each problem at a time. 1) email, 2) the status piece.

Get rid of all the HTML/CSS etc until these two key items are sorted.

Also, you're gaining less and less credibility by continuing to ask questions here without utilizing the recommendations that have been presented to you in the past: use warnings;, use strict;... where are those for example?

> where are those for example?
Warnings is on the shebang line.

See this 2013 thread CGI::ProgressBar Module Help Required and the correction here. Also the bug report from 2014.

well, i saw this cgi::progressbar example before. and also some samples. but i think mine is so different the problem with mine it has different css/js and am looking forward when the send mail command is pressed it should start progressing

bigup401 wrote:

# Newline format. send message to each email listed
my $output = join "\n", split " ", $receipts;
[download]

I don't think "Newline format" is a valid way to make a list of email recipients for MIME::Lite. I've always used comma separated lists and all the examples I've seen are like that. Perhaps you could consider making a small test program that just sends a test email to two addresses. After you get that working then make small test programs for the other parts of this you need to accomplish.