بسيط أخي العزيز
ما عليك إلا تغير هذا الكود في ملف ubb_library.pl
كود:
sub get_cookie {
local($chip, $val);
foreach (split(/; /, $ENV{'HTTP_COOKIE'})) {
# split cookie at each ; (cookie format is name=value; name=value; etc...)
# Convert plus to space (in case of encoding (not necessary, but recommended)
s/\+/ /g;
# Split into key and value.
($chip, $val) = split(/=/,$_,2); # splits on the first =.
# Convert %XX from hex numbers to alphanumeric
$chip =~ s/%([A-Fa-f0-9]{2})/pack("c",hex($1))/ge;
$val =~ s/%([A-Fa-f0-9]{2})/pack("c",hex($1))/ge;
# Associate key and value
#undef($cookie{$chip});
next if (defined($cookie{$chip})); # \1 is the multiple separator
#$cookie{$chip} .= "\1" if (defined($cookie{$chip})); # \1 is the multiple separator
$cookie{$chip} .= $val;
}
} # end SR NB - the other subroutines from this library [set-cookie, split-cookie, delete-cookie] have not been included here.
####
وتغييره إلى هذا الكود
كود:
sub get_cookie {
local($chip, $val);
foreach (split(/; /, $ENV{'HTTP_COOKIE'})) {
# split cookie at each ; (cookie format is name=value; name=value; etc...)
# Convert plus to space (in case of encoding (not necessary, but recommended)
s/\+/ /g;
# Split into key and value.
($chip, $val) = split(/=/,$_,2); # splits on the first =.
# Convert %XX from hex numbers to alphanumeric
$chip =~ s/%([A-Fa-f0-9]{2})/pack("c",hex($1))/ge;
$val =~ s/%([A-Fa-f0-9]{2})/pack("c",hex($1))/ge;
# Associate key and value
#undef($cookie{$chip});
next if (defined($cookie{$chip})); # \1 is the multiple separator
#$cookie{$chip} .= "\1" if (defined($cookie{$chip})); # \1 is the multiple separator
$cookie{$chip} .= $val;
}
$cookie{UserName}=~ s/%u0623/أ/g;
$cookie{UserName}=~ s/%u0628/ب/g;
$cookie{UserName}=~ s/%u062A/ت/g;
$cookie{UserName}=~ s/%u062B/ث/g;
$cookie{UserName}=~ s/%u062C/ج/g;
$cookie{UserName}=~ s/%u062D/ح/g;
$cookie{UserName}=~ s/%u062E/خ/g;
$cookie{UserName}=~ s/%u062F/د/g;
$cookie{UserName}=~ s/%u0630/ذ/g;
$cookie{UserName}=~ s/%u0631/ر/g;
$cookie{UserName}=~ s/%u0632/ز/g;
$cookie{UserName}=~ s/%u0633/س/g;
$cookie{UserName}=~ s/%u0634/ش/g;
$cookie{UserName}=~ s/%u0635/ص/g;
$cookie{UserName}=~ s/%u0636/ض/g;
$cookie{UserName}=~ s/%u0637/ط/g;
$cookie{UserName}=~ s/%u0638/ظ/g;
$cookie{UserName}=~ s/%u0639/ع/g;
$cookie{UserName}=~ s/%u063A/غ/g;
$cookie{UserName}=~ s/%u0641/ف/g;
$cookie{UserName}=~ s/%u0642/ق/g;
$cookie{UserName}=~ s/%u0643/ك/g;
$cookie{UserName}=~ s/%u0644/ل/g;
$cookie{UserName}=~ s/%u0645/م/g;
$cookie{UserName}=~ s/%u0646/ن/g;
$cookie{UserName}=~ s/%u0647/ه/g;
$cookie{UserName}=~ s/%u0648/و/g;
$cookie{UserName}=~ s/%u064A/ي/g;
$cookie{UserName}=~ s/%u0627/ا/g;
$cookie{UserName}=~ s/%u0640/ـ/g;
$cookie{UserName}=~ s/%u0629/ة/g;
$cookie{UserName}=~ s/%u0649/ى/g;
$cookie{UserName}=~ s/%u0624/ؤ/g;
$cookie{UserName}=~ s/%u0626/ئ/g;
$cookie{UserName}=~ s/%u0622/آ/g;
$cookie{UserName}=~ s/%u0625/إ/g;
$cookie{UserName}=~ s/%u0621/ء/g;
} # end SR NB - the other subroutines from this library [set-cookie, split-cookie, delete-cookie] have not been included here.
####
وبهذا سيقوم بالتعرف على الأسماء العربيه
والسلام عليكم ورحمة الله