امثلة على الاصناف CLASSES في لغة Perl
-
2020-10-14
- | daafoor
- | مشاهدات: 486
الاصناف (الصفوف) classes :
يمكن تسميتها باني الكائنات. يمكن لها أن يحتوي على حقول وتوابع وبواني وما إلى ذلك. إنه غلاف يربط / يغلف البيانات والوظائف معًا
التي يمكن الوصول إليها عن طريق إنشاء كائن. يمكن أن يشير الصنف إلى نوع البيانات الذي يحدده المستخدم والذي يحدد الخصائص من خلال جميع كائناته.
كود انشاء صف :
package My::File;
use strict;
use warnings;
1;
كود انشاء باني الصف :
sub new {
my ($class, %args) = @_;
return bless \%args, $class;
}
كود انشاء غرض من صف :
use Scalar::Util 'blessed';
my $Ana = {};
my $Christian = $Ana;
bless $Ana, 'Happiness';
print blessed( $Christian ) // 'not blessed'; # Class
print "\n";
$Christian = "some other value";
print blessed( $Christian ) // 'not blessed'; # not blessed
print "\n";
هذه المادة الدراسية هي ضمن مكتبة
مكتبة تمارين و امثلة بلغة البرمجة بيرل Perl
التعليقات
لا يوجد تعليقات
لاضافة سؤال او تعليق على المشاركة يتوجب عليك تسجيل الدخول
تسجيل الدخول
تسجيل الدخول