package TryOut; use strict; use warnings; { use Object::InsideOut; my @data :Field( 'Standard' => 'data', 'Permission' => 'private'); } #### #!/usr/bin/perl use strict; use warnings; use TryOut; my $obj = TryOut->new(); #### OIO::Internal error: Failure creating accessor for class 'TryOut' Error: OIO::Method error: Can't call private method 'TryOut->get_data' from class 'Object::InsideOut' Package: Object::InsideOut File: /usr/local/share/perl/5.8.8/Object/InsideOut.pm ... #### my @data :Field( 'Standard' => 'data', 'Permission' => 'private');