Question in comment to code :)
package Cat;
use Mojo::Base -base;
has 'token' => '12345';
has 'Tiger' => sub { Cat::Tiger-> new };
package Cat::Tiger;
use Mojo::Base 'Cat';
package main;
my $c = Cat->new(token=>'54321');
warn Dumper $c->Tiger->token; # how to make '54321' instead of '12345' ?
--
You received this message because you are subscribed to the Google Groups
"Mojolicious" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to [email protected].
To post to this group, send email to [email protected].
Visit this group at https://groups.google.com/group/mojolicious.
For more options, visit https://groups.google.com/d/optout.
