المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : دورة تعليم البيرل (Perl) - الدرس الثاني -


Expl0it-c0d3
28-10-2009, 03:09 PM
بسم الله الرحمن الرحيم
في درسنا اليوم إن شاء الله سنقوم بتعلم البرمجة بلغة البيرل
كجميع لغات البرمجة يجب تحديد نوعها في اول الصفحة كا لغة ((PHP تبدأ بـ: ((<? وهنا في لغة البيرل يجب تحديد مكان المترجم ألا وهو غالبا في الويندوز (C:\Perl\bin) وفي الل***س (/user/bin/perl)
على بركة سنقوم بوضع أو كود لن



#!C:\perl\bin
print "Sec4ever tutorial\n";



الآن بعد وضع الكود سنقوم بشرح وكيفية مشاهدته
السطر أظن أنه مفهوم وهو مسار البيرل
Print وهو أمر الطباعة على الشاشة
" " علامتي التنصيص وهو لطبع الكتابة التي بداخلها
/n وهو للذهاب الى سطر جديد
; وهو لنهاية الأمر الذي قبله والمقصود به (print)
كيفية الترجمة او تجربة الكود وهي كالتالي:
فتح ملف جديد وتكون لاحقته .pl مثل : sec4ever.


Perl sec4ever.pl


والنتيجة ستكون كالتالي


C:\>perl sec4ever.pl
Sec4ever tutorial


لمزيد من الفهم الكثير ساقوم بوضع كود متعدد الأسطر

#!C:\perl\bin
print "We\n";
print "Learn\n";
print "Perl\n";
print "in\n";
print "Sec4ever\n";

والنتيجة ستكون كالتالي


C:\>perl sec4ever.pl
We
Learn
Perl
in
Sec4ever



أو


print " We \n"; print "Learn\n";
print "Perl\n"; print "in\n";
print "Sec4ever\n";


الأن بعدما ما وضحنا كيفية وضع الكود وتطبيقة بطريقة بسطة سننتقل إلى العمليات الحسابية


print "5 + 6 = ", 5+6, "\n";
print "(2 + 3) * 6 = ", (2+3)*6, "\n";
print "2 + 3 * 6 = ", 2+3*6, "\n";
print "2 raised to the power of 8 is ", 2**8, "\n";
print "10-5 = ", 10-5, ". 5-10 = ", 5-10, "\n";
print "2/3 = ", 2/3, "\n";


قم بتطبيق الكود لترى الناتج . بعد ذالك سنقوم بالشرح سطر سطر
نلاحظ أن الناتج كان كالتالي


(2 + 3) * 6 = 30
2 + 3 * 6 = 20
2 raised to the power of 8 is 256
10-5 = 5. 5-10 = -5
2/3 = 0.666666666666667


كما لاحظتم هنا لقد قام بالعمليه الحسابية وطبعها لكن كيف


print "5 + 6 = ", 5+6, "\n";


print "5 + 6 = " هذا الأمر مفهوم ولكن كما نلاحظ أن , 5+6, لم توضع بين قوسين وهنا نخبر البرنامج بمعالجة الكود وطبع الناتج وليس بأخذه ككتابة فقط بل أخده ككود برمجي ومعالجته ثم أضفنا "/n" وهي أمر سطر جديد(raised to the power of) وتعني مضاعف (.) وصل سلسيلتين
أمثلة صغير للفهم أكثر قم بوضع هذا الكود:


print "Best," . " " . "Idea to lear" . "\n" .
" Read carefully before ask.\n";


لاحظ هنا اننا لم نقم بوضع (print) في السطر الثاني لأننا لم نقم بوضع ( ;) في أول السطر يعني هنا أننا مزالنا تحت الأمر(print) الأول
أنظر للناتج:


Best, Idea to learn
Read carefully before ask .


كما نلاحظ هنا فالنقطة هنا كانت صلة وصل بين الكلمتين و النقطة الأخيرة طبعت فقط لأنها كانت داخل علامتي
التنصيص
الأن نشرح بعض العلامات التي كانت فوق وهي غنية عن التعريف لأن الجميع تناولها من قبل في مادة الرياضيات


+ , - , * , /
a ** b وهي علامة الأس أو مضاعف
a.b وصل بين كلمتين



انتهى الدرس -2-
قد اكون وفقت او لم اوفق .. فأن وفقت فمن الله وان اخطئت فمن نفسي ...

HAMID FBi
30-10-2009, 02:26 PM
وااااااااااااالوووووو الدرس 2 ممتاز و مفيد
شكر كبير الاخ exploit c0d3

TOP SAT 13
22-01-2010, 11:33 AM
شكراا لك شرح ممتاز

VoLc4n0
02-02-2010, 12:15 PM
اول درس زي الحلاوه زي يلي بقدمه d:

هذا الكود هديه مني تطبيق ع الدرس يا ريت يعجبك

طبقته بالترمينال وشغلال ميه بالميه

وهو اول كود لي باللغه هذه واكون فخور تعطينا رايك فيه


#!user/bin/perl
print "volcano hacker in sec4erver\n".
" i love learn perl with Expl0it-c0d3\n";
print "my mark in final exam\n";
print "physics " . "93/100\n";
print "calculus " . "85/100\n";
print "AV of all ", (93+85)/200, "\n";

Flash
02-02-2010, 02:16 PM
اول درس زي الحلاوه زي يلي بقدمه d:

هذا الكود هديه مني تطبيق ع الدرس يا ريت يعجبك

طبقته بالترمينال وشغلال ميه بالميه

وهو اول كود لي باللغه هذه واكون فخور تعطينا رايك فيه


#!user/bin/perl
print "volcano hacker in sec4erver\n".
" i love learn perl with Expl0it-c0d3\n";
print "my mark in final exam\n";
print "physics " . "93/100\n";
print "calculus " . "85/100\n";
print "AV of all ", (93+85)/200, "\n";



حلو كتير فلكينوه

بس حابب اعقب على الكود اللى كتبتوه فيه غلطة بسيطة

print "physics " . "93/100\n";

والاصح انوه يكون الرابط فاصلة مش نقطة ان كنت بدك تنطبع كلمة فيزياء

print "physics " , "93/100\n";

VoLc4n0
02-02-2010, 02:22 PM
هلا حبيب قلبي فلاش

والله طبقت الامر زي ما انت قلت وزي ما انا كاتبه ع الاثنين طلع نفس الشيء

d:
ههههه مدري ليش

SeCuRiTy|CoDe
07-02-2010, 07:33 AM
جميل واصل و لكن عقدني السيرفر الشخصي باللينكس عنيد ماقدرت اثبته هههه

شرايك اخي تظع بعض الاسئله كتحفيز للاعضاء

مثلن تطلب كود يطبع جمله معينه وتطلبها بسطر واحد او كل كلمه بسطر

كل سؤال يكون من نفس الدرس من باب التحفيز فقط

واصل انا متابع معاك

Ma3sTr0-Dz
26-03-2010, 09:57 AM
بارك لله فيك على الدرس .. مفهوم تمام وفقّك لله

V!ru$_T4ckJ3n
06-05-2010, 06:54 PM
شكرا لك يا غالي

DR-HEX
05-06-2010, 12:29 AM
شكراااااا اخي مبدع

DZ-CRYPT
06-06-2010, 11:11 PM
بارك لله فيك