as requesed by tye : )

$ cat -vet rep_input.cgi

#!/usr/bin/perl -w ^M$
^M$
use strict;^M$
use CGI qw(:all);^M$
require 'include.pl';^M$
$! = 1;^M$
print header; ^M$
use DBI;^M$
^M$
my $REP_FNAME^I^I= uc( param('rep_fname') ); ^M$
my $REP_LNAME^I^I= uc( param('rep_lname') ); ^M$
[download]

"sometimes when you make a request for the head you don't
want the big, fat body...don't you go snickering."
                                         -- Nathan Torkington UoP2K a.k.a gnat