NAME

Data::Skeleton - Show the keys of a deep data structure

SYNOPSIS

use Data::Skeleton;
my $ds = Data::Skeleton->new;
my $deep_data_structure = {
    id            => 'hablando',
    last_modified => 1,
    sections      => [
        {
            content => 'h1. Ice Cream',
            class   => 'textile'
        },
        {
            content => '# Chocolate',
            class   => 'markdown'
        },
    ],
};
use Data::Dumper::Concise;
print Dumper $ds->deflesh($deep_data_structure);

# results in:

{
  id => "",
  last_modified => "",
  sections => [
    {
      class => "",
      content => ""
    },
    {
      class => "",
      content => ""
    }
  ]
}

DESCRIPTION

Sometimes you just want to see the "schema" of a data structure. This modules shows only the keys with blanks for the values.

debug_skeleton

Turn on/off debugging

METHODS

deflesh

Signature: (HashRef|ArrayRef)
  Returns: The data structure with values blanked

AUTHORS

Mateu Hunter hunter@missoula.org

COPYRIGHT

Copyright 2011-2012, Mateu Hunter

LICENSE

You may distribute this code under the same terms as Perl itself.