MIT SMS SCRIPT VIRKER IKKE!
Hej!Jeg har virkelig et kæmpe problem; mit nye sms-script fra http://www.script.dk virker ikke, og jeg fatter ikke hvad der er galt. Scriptet er et *.cgi script.
Her er scriptet:
----------------------------------------
#!/usr/bin/perl
#######################################
# FormMail-SMS.cgi #
# Copyright Ricki Runge for Script.dk #
# script@script.dk - www.script.dk #
#######################################
$mailprog = '/usr/sbin/sendmail';
read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
@Datain = split(/&/, $buffer);
$nr=-1;
foreach (@Datain) {
$nr ++;
@Datain[$nr] =~ s/\+/ /g;
@Datain[$nr] =~ s/%(..)/pack("c",hex($1))/ge;
($name, $value) = split(/=/, @Datain[$nr], 2);
if (lc($name) eq "mail_til") {
$email = $value;
}
if (lc($name) eq "mail_emne") {
$emne = $value;
}
if (lc($name) eq "ok_html") {
$ok_html = $value;
}
if (lc($name) eq "ok_html") {
$fejl_html = $value;
}
if (lc($name) eq "mail_fra") {
$fra = $value;
}
}
$udbyd = "fejl";
if ($email >= 20100000 && $email < 20600000) {
$udbyd = "sms.tdm.dk";
}
if ($email >= 20600000 && $email < 21000000) {
$udbyd = "note.sonofon.dk";
}
if ($email >= 21100000 && $email < 22000000) {
$udbyd = "sms.tdm.dk";
}
if ($email >= 22100000 && $email < 23000000) {
$udbyd = "note.sonofon.dk";
}
if ($email >= 23000000 && $email < 24000000) {
$udbyd = "sms.tdm.dk";
}
if ($email >= 26100000 && $email < 26900000) {
$udbyd = "sms.mobilix.dk";
}
if ($email >= 28100000 && $email < 28900000) {
$udbyd = "sms.mobilix.dk";
}
if ($email >= 40100000 && $email < 40500000) {
$udbyd = "sms.tdm.dk";
}
if ($email >= 40500000 && $email < 50000000) {
$udbyd = "note.sonofon.dk";
}
if ($udbyd eq "fejl") {
$ud_html = $fejl_html;
}
else {
$email = "$email\@$udbyd";
open(MAIL,"|$mailprog -t");
print MAIL "To: $email\n";
print MAIL "From: $fra\n";
print MAIL "Subject: $emne\n\n";
print MAIL "\n";
close (MAIL);
$ud_html = $ok_html;
}
#print "Content-type: text/html\n\n";
print "Location: $ud_html\n\n";
----------------------------------------
Jeg håber virkelig at I kan hjælpe for jeg er seriøst pisse irreteret over at det ikke virker (det er nok derfor at jeg giver hele 500 point, for et rigtigt svar).
Det skal lige siges at jeg har prøvet at omdøbe scriptet til formmail-sms.pl men det gav heller ikke noget resultat.
Min server står hos http://www.netsite.dk
Med venlig hilsen
nof/Christian Christoffersen
