當前位置:首頁 » Perl » Perl bless()函數

Perl bless()函數

perl bless()函數,bless()函數學習例子,bless()函數實例代碼,bless()函數教學等

語法

bless REF, CLASSNAME

bless REF


定義和用法

告訴REF所引用的實體,它現在是一個對象在CLASSNAME包,或CLASSNAME包,如果被省略。建議使用兩個參數形式bless函數。

返回值

  • 參考的對象blessed CLASSNAME

例子

 bless包的類創建的對象引用。例如:

package Person;
sub new
{
    my $class = shift;
    my $self = {
        _firstName => shift,
        _lastName  => shift,
        _ssn       => shift,
    };
    # Print all the values just for clarification.
    # by www.gitbook.net
    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;
}