PerlTk - perl form help please

Author

perl form help please

M.E.

2004-06-29, 8:56 pm

I have following not working it report that I have
Can't find string terminator "STR" anywhere before EOF at init.pl line 50.
Compilation failed in require at /s101/home4/sgiwedding/cgi/form.pl line 9.

I can not find how to fix this as I really don't know anything about pearl
and need to get this form working .
Terminator STR is there so why it is complaining?

Can you please help?

Thanks

------------------
sub estab {
####################
### ?????? ###
####################

# (1)sendmail???????????????

$SENDMAIL = '/usr/sbin/sendmail';

# (2)???????????(1.??/0.????)

$CONFIRM_FLAG = 0;

# (3)?????????????????(URL????)???????

# $CONFIRM_TMPL = 'check_mail.html';

# (4)????????????????????

$REQUIRED =
qq(church!!!name1!!!name2!!!name3!!!name
4!!!name5!!!name6!!!name7!!!
name8!!!_email!!!tel!!!);

# (5)???????/?????????????????
# ?????????????,???????????????

$SENDTO = 'info@sgiwedding.com';
$SENDFROM = 'info@sgiwedding.com';

# (6)???????????????????(??)??????????

$SUBJECT = '????????????';

# (7)??????????HTML?URL

$THANKS = 'http://www.sgiwedding.com/send.html';

# (8)??????????

chomp($FORMAT = <<'STR');
**********************************
????????????
**********************************

##name1##? ??????????????????????????
??????????????????
????????????????????????

---- ???? ----

?????? : ##church##
????? : 200##h_year## ? ##h_month## ? ##h_day## ? ##jikan##

???? : ##name1## ##name2##
: ##name3## ##name4##
???? : 19##m_year## ? ##m_month## ? ##m_day## ?

???? : ##name5## ##name6##
: ##name7## ##name8##
???? : 19##f_year## ? ##f_month## ? ##f_day## ?

??? : ##whoinfo##
????? : ##zip1## - ##zip2##
? ? : ##address##
???? : ##tel##
???? : ##tes2##
E-mail : ##_email##

?????????? :
##question##

? sunshine-wedding.com ??????????
mailto: info@sgiwedding.com
STR} 1;
---------------------------------------

Ala Qumsieh

2004-06-30, 3:58 pm

M.E. wrote:
> I have following not working it report that I have
> Can't find string terminator "STR" anywhere before EOF at init.pl line 50.
> Compilation failed in require at /s101/home4/sgiwedding/cgi/form.pl line 9.
>
> I can not find how to fix this as I really don't know anything about pearl
> and need to get this form working .
> Terminator STR is there so why it is complaining?

It has to be on a line all by itself. No spaces, nothing.

> STR} 1;

STR
} 1;

--Ala

Sponsored Links