SYNOPSIS

# alternatively, see the dataWalker.pl script in this distribution!
use Wx::Perl::DataWalker;

my $data_to_browse = {
# complex data structure.
# Good test: \%::
};

package MyWalkerDialog;
our @ISA = qw(Wx::App);

sub OnInit {
my $self = shift;
my $frame = Wx::Perl::DataWalker->new(
{data => $data_to_browse},
undef, -1,
"dataWalker",
);
$self->SetTopWindow($frame);
$frame->Show(1);
$frame->SetSize(500,500);
return 1;
}

package main;
my $app = MyWalkerDialog->new();
$app->MainLoop();

DESCRIPTION

"Wx::Perl::DataWalker" implements a "Wx::Frame" subclass that shows a relatively simple Perl data structure browser. After opening such a frame and supplying it with a reference to an essentially arbitrary data structure, you can visually browse it by double-clicking references.

So far, there is no tree view but only a display of the current level of the data structure. You can traverse back up the structure with a back button.

Optionally, "Wx::Perl::DataWalker" displays the (approximate!) size of the data structure using "Devel::Size".

AUTHOR

Steffen Mueller, <[email protected]>

COPYRIGHT AND LICENSE

Copyright (C) 2009 by Steffen Mueller

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8 or, at your option, any later version of Perl 5 you may have available.