Alex Rivera | Logout

What exactly does Perl's "bless" do?

Asked 2008-12-24T19:48:51.993
160

I understand one uses the "bless" keyword in Perl inside a class's "new" method:

sub new {
    my $self = bless { };
    return $self;
}

But what exactly is "bless" doing to that hash reference ?

perl
Edit
Report

1 Answer

162

In general, bless associates an object with a class.

package MyClass;
my $object = { };
bless $object, "MyClass";

Now when you invoke a method on $object, Perl know which package to search for the method.

If the second argument is omitted, as in your example, the current package/class is used.

For the sake of clarity, your example might be written as follows:

sub new { 
  my $class = shift; 
  my $self = { }; 
  bless $self, $class; 
}

EDIT: See kixx's good answer for a little more detail.

answered 2008-12-24T19:58:09.900

Your Answer