امثلة على التوابع FUNCTIONS في لغة Perl
-
2020-10-14
- | daafoor
- | مشاهدات: 480
التابع function :
هو كتلة من التعليمات البرمجية يتم تشغيلها فقط عند استدعائها.
كود انشاء تابع و استدعاءه :
#defining function
sub myOffice{
print "javaTpoint!\n";
}
# calling Function
myOffice();
كود انشاء تابع ذو وسطاء و استدعاءه :
$squarePerimeter = perimeter(25);
print("This is the perimter of a square with dimension 25: $squarePerimeter\n");
sub perimeter {
$dimension = $_[0];
return(4 * $dimension);
}
كود انشاء تابع مع قوائم و استدعاءه :
sub myList{
my @list = @_;
print "Here is the list @list\n";
}
@a = ("Orange", "Pineapple", "Mango", "Grapes", "Guava");
# calling function with list
myList(@a);
هذه المادة الدراسية هي ضمن مكتبة
مكتبة تمارين و امثلة بلغة البرمجة بيرل Perl
التعليقات
لا يوجد تعليقات
لاضافة سؤال او تعليق على المشاركة يتوجب عليك تسجيل الدخول
تسجيل الدخول
تسجيل الدخول