Data::Zipper - Easily traverse and transform immutable data
package Person; use Moose; has name => ( is => 'ro' ); package MyApp; use Data::Zipper 'zipper'; my $person = Person->new( name => 'John' ) my $sally = zipper($person) ->traverse('name')->set('Sally') ->up ->focus;
Create a zipper of the correct type, depending on the data given
COPYRIGHT AND LICENSE
This software is copyright (c) 2011 by Oliver Charles <email@example.com>.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.