أين أنتم يا خبراء السيكريبتات ... مشكلة عند الجميع .. ؟؟؟؟

[النهام]

السلام عليكم ورحمة الله وبركاته ..
أنا عضو جديد عندكم في المنتدى وإنشاء الله أحصل عندك الحل لهذا السيكريبت الذي تاه الجميع لمعرفة حله ,,

أتمنى من الخبراء أهم يحلونه ..

هو سيكريبت إرسال الرسائل إلى الجوال SMS

هذا هو السيكريبت

#!/usr/bin/perl

print "Content-type: text/html\n\n";
read(STDIN, $input,$ENV{'CONTENT_LENGTH'});
@pairs = split(/&/, $input);
foreach $pair (@pairs) {
	($name, $value) = split(/=/, $pair);
	$name =~ tr/+/ /;
	$name =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
	$value =~ tr/+/ /;
	$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
	$IN{$name} = $value;
}


open (MAIL,"| mail $IN{'to'}\@gsm1.net.ae") || die "Error: Can
t start mail program";
print MAIL "$IN{'msg'}\n";
print MAIL "($IN{'from'})\n\n";
print MAIL "Alnahaam.com";

print "Thank you. Go Back to Send Another SMS Message.";

في الحقيقة السيكريبت يعمل 100%ولكن يوجد هناك غلط ما
وأتمنى أن يحله الخبراء

الغلط : هو أنه عندما تصل الرسالة إلى الجوال (الموبايل)يظهر أمام الرسالة الأصلية عنوان أو بريد المضيف على ما أعتقد

المهم .. أنا أتمنى من الخبراء تعديل السيكريبت لكي لا يظهر هذا العنوان أو بريد المضيف

والمشكلة تكمن في هذا الشيء وأتمنى من الخبراء حل هذه المشكلة في أسرع وقت

والسموحه على الإطاله يا إخواني

تحياتي لكم
أخوكم النهام

[vilixi]

أخي النهام ..

جرب هذه المحاولة ..

#!/usr/bin/perl 

print "Content-type: text/html\n\n"; 
read(STDIN, $input,$ENV{'CONTENT_LENGTH'}); 
@pairs = split(/&/, $input); 
foreach $pair (@pairs) { 
($name, $value) = split(/=/, $pair); 
$name =~ tr/+/ /; 
$name =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg; 
$value =~ tr/+/ /; 
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg; 
$IN{$name} = $value; 
} 


open (MAIL,"| mail $IN{'to'}\@gsm1.net.ae") || die "Error: Can 
t start mail program";
print MAIL "From: $IN{'from'}\n\n";  
print MAIL "$IN{'msg'}\n"; 
print MAIL "Alnahaam.com"; 

print "Thank you. Go Back to Send Another SMS Message

هذا على إفتراض أنه في الـ Form المرسل يوجد خانة لإدخال الجهة المرسِلة للرسالة ..
التعديلات التي حصلت هو أن رسالة البريد الإلكتروني تنقسم إلى قسمين:
1- قسم الـ Header
2- قسم الـ Body أو الـ Message بالأصح
قسم الـ Header يأخذ العديد من البيانات التي تحدد من المرسل وإلى من سترد الرسالة وغيرها الكثير ..
والتعديل الذي حدث هو إضافة الجملة الرئيسية :
From: ...
وتلك هي الجملة التي توضع في القسم Header وتعرِّف من هو مرسل الرسالة ..

[النهام]

تسلم يا خوي على الرد
ولكن مافي فايده نفس المشكله
ولكن المشكله هنا
open (MAIL,"| mail $IN{'to'}\@gsm1.net.ae") || die "Error: Can
t start mail program";

لان قبل اسم المرسل
mail
وهاي هي تسبب في ظهور اسم سيرفر الشركه

انتظر ردك يا خوي

[bu7maid]

في اعتقادي انه اذا تم تغيير mail و عمل تغييرات في الكود ليناسب استخدام SMTP (send mail transfer pretocol) لن يظهر اسم المستضيف في الرسالة..
لكني لا أعرف كيفية عمل ذلك.

[mubarmej]

قم بإرسال رسالة بريدية عادية إلى العنوان التالي :

xxxxxxx@gsm1.net.ae

مع وضع رقم الهاتف الخاص بك بدلا من علامات x ..

إذا ظهرت لك نفس المشكلة في الرسالة التي وصلت إليك فهذا يعني بأن شركة الهاتف لديكم تضيف عنوان السيرفر إلى الرسالة ولكن يكون هنالك حل لهذه المشكلة في حال كان ذلك صحيحا.