Fejl i Perl
Hej alle, jeg har disse linier i mit script:if ($cryptword) {
print \"<INPUT TYPE=HIDDEN NAME=admincheck VALUE=1>\\n\";
}
print \"<P><INPUT TYPE=SUBMIT NAME=uploadbanner \";
print \"VALUE=\\\"$text{\'5502\'}\\\"></STRONG></FONT COLOR></CENTER></FORM>\\n\";
}
}
Jeg vil nu tilføje et mailscript som sender mail HVIS variablen \"displaycount = 0\"
men det virker ikke, den sender ALTID mail selvom variablen = 0, det hele ser sådan ud:
if ($cryptword) {
print \"<INPUT TYPE=HIDDEN NAME=admincheck VALUE=1>\\n\";
}
print \"<P><INPUT TYPE=SUBMIT NAME=uploadbanner \";
print \"VALUE=\\\"$text{\'5502\'}\\\"></STRONG></FONT COLOR></CENTER></FORM>\\n\";
$displaycount = 0;
print MAIL \"To: $email\\n\";
print MAIL \"From: $email_address\\n\";
print MAIL \"Subject: $text{\'2008\'}\\n\\n\";
print MAIL \"$text{\'1\'}\\n\\n\";
print MAIL \"$text{\'2\'}\\n\\n\";
print MAIL \"$text{\'3\'}\\n\\n\";
print MAIL \"$text{\'4\'}\\n\\n\";
print MAIL \"$text{\'5\'}\\n\\n\";
print MAIL \"$text{\'6\'}\\n\\n\";
print MAIL \"$text{\'7\'}\\n\\n\";
print MAIL \"$text{\'8\'}\\n\";
print MAIL \"$text{\'9\'}\\n\";
print MAIL \"$text{\'10\'}\\n\\n\";
}
}
Hvad er fejlen ?