my $new_thing = (ref $this_thing)->new(@params);
[download]

You don't need to put (cargo-cult fashion) the "ref $proto || $proto" device in every single constructor. The caller can control this.

If you want to provide a clone method in your class, do so. But don't try to make "new" do double duty. It confuses those of us with some common sense.

-- Randal L. Schwartz, Perl hacker

If you want to provide a clone method in your class, do so. But don't try to make "new" do double duty. It confuses those of us with some common sense.

Again, it's not a clone method, and there is prior art on this from Smalltalk. I'd be surprised if you haven't run across it. A double-duty new is basically simulating what Perl cannot do directly, which is to separate instance-side from class-side methods.

I'll let the bit about confusing you with some common sense slide for now.

{...} there is prior art on this from Smalltalk. I'd be surprised if you haven't run across it. {...}

So, to test your theory, I took the latest Squeak Smalltalk image (arguably derived directly from the original Xerox Park Smalltalk80 Image), and ran a few tests:

Metaclass allInstances size
-> 1280
[download]

So there are 1280 classes in the current image. Now how many of them understand "new" as an instance method:

Metaclass allInstances select: [:m | m soleInstance includesSelector: 
+#new]
->
#(Behavior class Metaclass class)
[download]

There. The only two classes that have instances that understand #new are the things that act as factories: Behavior and Metaclass. And the code for Metaclass instances basically just says "don't do that" and throws an error. {grin} And the code is in Behavior so that all object classes also know how to #new themselves.

So I go by my original hypothesis. In classic OO programming, best illustrated by Smalltalk80, the word "new" contains the strict connotation of "make a new instance of", and is applied only to class objects, not to instance objects.

By contrast, the Object implements both #clone (as a primitive) and #copy (to allow overriding for shallow copy vs deep copy), so every object knows how to clone itself.

-- Randal L. Schwartz, Perl hacker
Be sure to read my standard disclaimer if this is a reply.