in reply to "Moo detecting Moose" mechanics?

I found an easy way to experiment with it. Use Moo::sification as an indicator:
#! /usr/bin/perl use warnings; use strict; use feature qw{ say }; #use Local; { package My; use Moo; has x => (is => 'rw'); } my $o = 'My'->new(x => 12); #say for $o->meta->get_method_list; #say $o->meta->isa('Moose::Meta::Class'); require Moo::sification; Moo::sification->unimport();

where Local uses Moose.

Uncommenting either the use Local or any of the ->meta lines makes the unimport fail with

Can't disable Moo::sification after inflation has been done

map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]

Replies are listed 'Best First'.
Re^2: "Moo detecting Moose" mechanics?
by LanX (Saint) on Apr 18, 2019 at 17:40 UTC
    Thanks to you and Corion. :)

    Cheers Rolf
    (addicted to the Perl Programming Language :)
    Wikisyntax for the Monastery FootballPerl is like chess, only without the dice