in reply to Re: Object::InsideOut, I don't get it
in thread Object::InsideOut, I don't get it
You are missing sub new just before the beginning '{' in TryOut.pmUhm, no, that's nonsense. See the Object::InsideOut docs please.
There _is_ a bug with the "Standard" attribute, but I haven't been able to put my finger on it just yet.
my @data :Field('Accessor' => 'data'); does generate a data accessor.
Adding the Permission=>'private' field results in
So that works as expected. I suspect the "Standard" attribute doesn't actually work as documented. Maybe time for a bug report :)OIO::Method error: Can't call private method 'TryOut->data' from class + 'main' Package: main File: object-insideout Line: 19
#!/usr/bin/perl use strict; use warnings; package TryOut; use strict; use warnings; { use Object::InsideOut; my @data :Field('Accessor' => 'data', Permission=>'private'); } 1; package main; my $obj = TryOut->new(); $obj->data(42); print $obj->data; __END__
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^3: Object::InsideOut, I don't get it
by xdg (Monsignor) on Mar 05, 2006 at 18:56 UTC | |
by jdhedden (Deacon) on Mar 06, 2006 at 02:10 UTC |