描述

此函数告诉REF引用的实体,它现在是CLASSNAME包中的对象,如果省略CLASSNAME,则为当前包中的对象。建议使用bless的两个参数形式。

语法

以下是此函数的简单语法-

bless REF, CLASSNAME
bless REF

返回值

该函数返回对祝福到CLASSNAME中的对象的引用。

例

以下是显示其基本用法的示例代码,通过祝福对包类的引用来创建对象引用-

#!/usr/bin/perl
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;
}

参考链接

www.learnfk.com/perl/perl-b…