数据结构
网络
RDBMS
操作系统
Java
MS Excel
iOS
HTML
CSS
Android
Python
C 编程
C++
C#
MongoDB
MySQL
Javascript
PHP
物理
化学
生物
数学
英语
经济学
心理学
社会学
时尚
法律使用 Perl 创建和使用对象
要创建一个类（一个对象）的实例，我们需要在 Perl 中使用一个对象构造函数。该 Perl 中的构造函数是一个在包内定义的方法。大多数程序员选择将此对象构造函数方法命名为 new，但在 Perl 中你可以使用任意名称。
你可以在 Perl 中使用任何类型的 Perl 变量作为对象。大多数 Perl 程序员选择引用数组或哈希。
让我们使用 Perl 哈希引用来为我们的 Person 类创建构造函数。创建对象时，你需要提供一个构造函数，它是包内的一个返回对象引用的子例程。对象引用是通过祝福一个包类的引用来创建的。例如，以下所示 −
package Person;
sub new {
my $class = shift;
my $self = {
_firstName => shift,
_lastName => shift,
_ssn => shift,
};
# Print all the values just for clarification.
print "First Name is $self->{_firstName}\n";
print "Last Name is $self->{_lastName}\n";
print "SSN is $self->{_ssn}\n";
bless $self, $class;
return $self;
}现在，让我们看看如何创建一个对象。
$object = new Person( "Mohammad", "Saleem", 23234345);
如果你不想向任何类变量分配任何值，则可以在构造函数中使用简单的哈希。例如，以下所示 −
package Person;
sub new {
my $class = shift;
my $self = {};
bless $self, $class;
return $self;
}
更新日期： 02-12-2019
173 浏览量
广告