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.htm l';
# (4)???????????? ????????
$REQUIRED =
qq(church!!!nam e1!!!name2!!!na me3!!!name4!!!n ame5!!!name6!!! name7!!!
name8!!!_email! !!tel!!!);
# (5)???????/??????????????? ??
# ?????????????,? ??????????????
$SENDTO = 'i***@sgiweddin g.com';
$SENDFROM = 'i***@sgiweddin g.com';
# (6)???????????? ???????(??)???? ??????
$SUBJECT = '????????????';
# (7)??????????HT ML?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: in**@sgiwedding .com
STR} 1;
---------------------------------------