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.