Re^3: Rename a Moo constructor from "new" to "run"

Replies are listed 'Best First'.
Re^4: Rename a Moo constructor from "new" to "run" by tobyink (Canon) on Apr 01, 2019 at 15:58 UTC
`use v5.16; package Foo { use Moo; has blah => (is => 'ro', required => 1); sub run { shift->new(@_) } } say Foo->run(blah => 42)->blah;` [download] Doing `SUPER::new` will probably work in this case, though if you call it repeatedly, you won't benefit from some of the optimizations Moo does. (Moo doesn't actually built a `Foo::new` sub straight away, but when `Moo::new` gets called, it will notice that `Foo::new` is missing, build an optimized constructor, install it, and goto it.) In cases where you weren't using a class building toolkit like Moo, and `Foo::new` was a hand-written constructor, then you definitely wouldn't want to call `SUPER::new` because you'd be bypassing the class's hand-written constructor (in favour of the superclass's constructor) which might be doing important stuff. toby döt ink	[reply] [d/l] [select]
Re^5: Rename a Moo constructor from "new" to "run" by karlgoethebier (Abbot) on Apr 01, 2019 at 16:40 UTC
Pretty cool. Best regards, Karl ŤThe Crux of the Biscuit is the Apostropheť `perl -MCrypt::CBC -E 'say Crypt::CBC->new(-key=>'kgb',-cipher=>"Blowfish")->decrypt_hex($ENV{KARL});'`Help	[reply] [d/l]
Re^4: Rename a Moo constructor from "new" to "run" by bliako (Abbot) on Mar 30, 2019 at 22:59 UTC
`SUPER::new()` calls `new()` of parent-class, if any.	[reply] [d/l] [select]
Re^5: Rename a Moo constructor from "new" to "run" by choroba (Cardinal) on Mar 30, 2019 at 23:06 UTC
So does ~~$self~~ `Class->new` if no `sub new` was declared in the Class. `map{substr$_->[0],$_->[1]\|\|0,1}[\\|\|{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^ARGV,3]`	[reply] [d/l] [select]
Re^6: Rename a Moo constructor from "new" to "run" by bliako (Abbot) on Mar 30, 2019 at 23:34 UTC
Omitting the pedantic: "Does `$self->new` make sense?", does Perl have something similar to `new XYZ;` which will search for the nearest `new()` all the way up the inheritance tree of XYZ? 5' Edit: perhaps Moo supplies these	[reply] [d/l] [select]
Re^7: Rename a Moo constructor from "new" to "run" by AnomalousMonk (Archbishop) on Mar 31, 2019 at 03:33 UTC
Re^7: Rename a Moo constructor from "new" to "run" by choroba (Cardinal) on Mar 30, 2019 at 23:39 UTC
Re^5: Rename a Moo constructor from "new" to "run" by karlgoethebier (Abbot) on Mar 31, 2019 at 12:48 UTC
Sure. That's why i did it in the example mentioned: Inheriting the constructor, renaming it and changing it's behavior. A plugin... ŤThe Crux of the Biscuit is the Apostropheť `perl -MCrypt::CBC -E 'say Crypt::CBC->new(-key=>'kgb',-cipher=>"Blowfish")->decrypt_hex($ENV{KARL});'`Help	[reply] [d/l]