SMS Sender uden e-mail adresse i starten

Jeg ville gerne vide om der er et CGI, ASP eller PHP script/kode der kan sende en SMS med 160 uden nogle form for kode eller e-mail adresse i starten af beskeden? Jeg er hosted af Whitehat.dk og hver gang jeg sender en besked fra siden står der anonymous@whitehat.dk i starten af beskeden og så kommer beskeden bagefter... Hvis der er et program jeg måske kan få dem på whitehat til at installere sådan at man kan ungå e-mail adressen i første linje af SMS beskeden! Eller hvis der er et script der kan sende sms\'er uden det er over e-mail! Jeg bruger et script fra Script.dk (som jeg har ændret lidt I)!

- Sådan ser (CGI) scriptet ud:

<----------------START-------------------->

#!/usr/bin/perl

$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 \"sms_til\") {
  $email = $value;
}
if (lc($name) eq \"sms_besked\") {
  $emne = $value;
}
if (lc($name) eq \"ok_html\") {
  $ok_html = $value;
}
if (lc($name) eq \"ok_html\") {
  $fejl_html = $value;
}
if (lc($name) eq \"sms_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 >= 23200000 && $email < 24000000) {
$udbyd = \"sms.tdm.dk\";
}
if ($email >= 24100000 && $email < 25000000) {
$udbyd = \"sms.tdm.dk\";
}
if ($email >= 25200000 && $email < 25400000) {
$udbyd = \"note.sonofon.dk\";
}
if ($email >= 26100000 && $email < 27000000) {
$udbyd = \"sms.mobilix.dk\";
}
if ($email >= 27000000 && $email < 27400000) {
$udbyd = \"sms.mobilix.dk\";
}
if ($email >= 28100000 && $email < 28900000) {
$udbyd = \"gsm1800.telia.dk\";
}
if ($email >= 29000000 && $email < 29900000) {
$udbyd = \"sms.tdm.dk\";
}
if ($email >= 29900000 && $email < 29940000) {
$udbyd = \"sms.tdm.dk\";
}
if ($email >= 40100000 && $email < 40500000) {
$udbyd = \"sms.tdm.dk\";
}
if ($email >= 40500000 && $email < 50000000) {
$udbyd = \"note.sonofon.dk\";
}
if ($email >= 72100000 && $email < 72300000) {
$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\";

<----------------SLUT--------------------->

Hvis der er nogle spørgsmål, så skriv...

Håber der er en måde, man kan få det til at virke!!! Mange Tak!!!