|
I get no errors at all with the following code:
package Foo; {
use Object::InsideOut;
use Attribute::Params::Validate;
sub foo :method :Validate(bar => 1)
{
my $self = shift;
my %args = @_;
my $bar = $args{bar};
}
}
Foo::foo(bar => 'toto');
1;
I cannot explain the error you're receiving.
I suggest upgrading your Perl if you are not at 5.8.8, and running:
cpan -i Bundle::Object::InsideOut
to get the latest versions of all modules used by Object::InsideOut.
|
(2)
]
