use Moo::Role ();
use Sub::Quote;
-our $VERSION = '1.001000'; # 1.1.0
+our $VERSION = '1.003000'; # 1.3.0
$VERSION = eval $VERSION;
has lexicals => (is => 'rw', default => quote_sub q{ {} });
isa => sub {
my ($val) = @_;
die "Invalid context type $val - should be list, scalar or void"
- unless $valid_contexts{$val};
+ unless $valid_contexts{$val};
},
);
}
}
}
+1;
+__END__
+
=head1 NAME
Eval::WithLexicals - pure perl eval with persistent lexical variables
David Leadbeater <dgl@dgl.cx>
+haarg - Graham Knop (cpan:HAARG) <haarg@cpan.org>
+
=head1 COPYRIGHT
Copyright (c) 2010 the Eval::WithLexicals L</AUTHOR> and L</CONTRIBUTORS>
as perl itself.
=cut
-
-1;