How to create instance in perl if we dont have new() named constructor

Question

i was thinking about new() constructor. As we know that we can give any name. Generally we do like this..

package PP;
sub new
{
    my $class = shift;
    my $self = {
        _first => shift,
        _last  => shift,
        _st       => shift,
    };

    print "First Name is $self->{_first}\n";
    print "Last Name is $self->{_last}\n";
    print "ST is $self->{_st}\n";
    bless $self, $class;
    return $self;
}

and at the time of calling we do as below:

$object = new PP( "Mohan", "Sohan", 223345);

So here we are using new because we have constructor name 'new()' but how we will handle that if constructor name is few() (instead of new()). is that like below?

$object = few PP( "Mohan", "Sohan", 223345);

The easiest way to answer this question is try it out and see if it works — Zaid
– Zaid, Commented Apr 21, 2014 at 11:06
Your question is answered here: stackoverflow.com/q/11695110/133939 — Zaid
– Zaid, Commented Apr 21, 2014 at 11:07
The question may not be similar, but the accepted answer there is applicable to your query. It explains 'indirect method notation', which is what you are asking about. — Zaid
– Zaid, Commented Apr 21, 2014 at 11:15

ikegami · Accepted Answer · 2014-04-21 11:17:25Z

4

There's nothing special about new. (bless is what really constructs the object.) So

$object = few PP( "Mohan", "Sohan", 223345);

is the equivalent of

$object = new PP( "Mohan", "Sohan", 223345);

Indirect method calls can cause confusing errors, so the following is usually recommended

$object = PP->new( "Mohan", "Sohan", 223345);

$object = PP->few( "Mohan", "Sohan", 223345);

answered Apr 21, 2014 at 11:17

ikegami

391k17 gold badges291 silver badges555 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

Sundar R Over a year ago

@user3518094 You can mark this answer as Accepted by clicking on the tick-mark on the left side.

Collectives™ on Stack Overflow

How to create instance in perl if we dont have new() named constructor

1 Answer 1

1 Comment

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

1 Comment

Your Answer

Sign up or log in

Post as a guest

Linked

Related