The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Catmandu::Fix::retain - delete everything except the paths given

SYNOPSIS

   # Delete everything except foo.bar and baz.bar
   retain(foo.bar, bar.baz)

   {bar => { x => 1} , foo => {bar => 1, y => 2}}
   # becomes
   {foo => {bar => 1}}

SEE ALSO

Catmandu::Fix