Help for this page
Use of uninitialized value in formline at ????.pl line ??.
my ($cust, $d1, $d2, $c1, $c2);