$VAR1 = {
          'menu' => [
                      bless( {
                               'level' => 1,
                               'name' => 'beer',
                               'url' => 'beer',
                               'file' => '/home/karpet/blog/beer',
                               'dir' => 1
                             }, 'PodBlog::Model::Menu::Entry' ),
                      bless( {
                               'level' => 1,
                               'name' => 'books',
                               'url' => 'books',
                               'file' => '/home/karpet/blog/books',
                               'dir' => 1
                             }, 'PodBlog::Model::Menu::Entry' ),
                      bless( {
                               'level' => 1,
                               'name' => 'general',
                               'url' => 'general',
                               'file' => '/home/karpet/blog/general',
                               'dir' => 1
                             }, 'PodBlog::Model::Menu::Entry' ),
                      bless( {
                               'level' => 1,
                               'name' => 'ideas',
                               'url' => 'ideas',
                               'file' => '/home/karpet/blog/ideas',
                               'dir' => 1
                             }, 'PodBlog::Model::Menu::Entry' ),
                      bless( {
                               'level' => 1,
                               'name' => 'ingrid-sequoia',
                               'url' => 'ingrid-sequoia',
                               'file' => '/home/karpet/blog/ingrid-sequoia.txt',
                               'dir' => 0
                             }, 'PodBlog::Model::Menu::Entry' ),
                      bless( {
                               'level' => 1,
                               'name' => 'music',
                               'url' => 'music',
                               'file' => '/home/karpet/blog/music',
                               'dir' => 1
                             }, 'PodBlog::Model::Menu::Entry' ),
                      bless( {
                               'level' => 1,
                               'name' => 'ny',
                               'url' => 'ny',
                               'file' => '/home/karpet/blog/ny',
                               'dir' => 1
                             }, 'PodBlog::Model::Menu::Entry' ),
                      bless( {
                               'level' => 1,
                               'name' => 'perl',
                               'url' => 'perl',
                               'file' => '/home/karpet/blog/perl',
                               'dir' => 1
                             }, 'PodBlog::Model::Menu::Entry' ),
                      bless( {
                               'level' => 2,
                               'name' => 'perl-dot-org',
                               'url' => 'perl/perl-dot-org',
                               'file' => '/home/karpet/blog/perl/perl-dot-org.txt',
                               'dir' => 0
                             }, 'PodBlog::Model::Menu::Entry' ),
                      bless( {
                               'level' => 2,
                               'name' => 'perldoc',
                               'url' => 'perl/perldoc',
                               'file' => '/home/karpet/blog/perl/perldoc.txt',
                               'dir' => 0
                             }, 'PodBlog::Model::Menu::Entry' ),
                      bless( {
                               'level' => 2,
                               'name' => 'REST-resources',
                               'url' => 'perl/REST-resources',
                               'file' => '/home/karpet/blog/perl/REST-resources.txt',
                               'dir' => 0
                             }, 'PodBlog::Model::Menu::Entry' ),
                      bless( {
                               'level' => 1,
                               'name' => 'projects',
                               'url' => 'projects',
                               'file' => '/home/karpet/blog/projects',
                               'dir' => 1
                             }, 'PodBlog::Model::Menu::Entry' ),
                      bless( {
                               'level' => 1,
                               'name' => 'search',
                               'url' => 'search',
                               'file' => '/home/karpet/blog/search',
                               'dir' => 1
                             }, 'PodBlog::Model::Menu::Entry' ),
                      bless( {
                               'level' => 1,
                               'name' => 'spam',
                               'url' => 'spam',
                               'file' => '/home/karpet/blog/spam',
                               'dir' => 1
                             }, 'PodBlog::Model::Menu::Entry' ),
                      bless( {
                               'level' => 1,
                               'name' => 'stpaulbartour',
                               'url' => 'stpaulbartour',
                               'file' => '/home/karpet/blog/stpaulbartour',
                               'dir' => 1
                             }, 'PodBlog::Model::Menu::Entry' )
                    ],
          'blog' => [
                      bless( {
                               'format' => 'txt',
                               'text' => 'REST resources

<a href="http://www.modernperlbooks.com/mt/2011/09/restful-perl-resources.html"
>Read through the comments for some good further reading</a>.
',
                               'mtime' => 1316789898,
                               'name' => 'REST-resources',
                               'url' => 'perl/REST-resources',
                               'file' => '/home/karpet/blog/perl/REST-resources.txt',
                               'id' => 'REST-resources.txt'
                             }, 'PodBlog::Model::Blog::Entry' ),
                      bless( {
                               'format' => 'txt',
                               'text' => 'perl dot org

And just on the heels of my last post! A <a href="http://use.perl.org/article.pl?sid=09/11/13/0917227">new look</a>
 for the <a href="http://www.perl.org/">perl.org</a> site. 

Looks very nice. Good work folks.
',
                               'mtime' => 1258180366,
                               'name' => 'perl-dot-org',
                               'url' => 'perl/perl-dot-org',
                               'file' => '/home/karpet/blog/perl/perl-dot-org.txt',
                               'id' => 'perl-dot-org.txt'
                             }, 'PodBlog::Model::Blog::Entry' ),
                      bless( {
                               'format' => 'txt',
                               'text' => 'perldoc 5.8.1

Just added the Perl docs for v 5.8.1 to the docs/ section. This is, of course, my favorite
programming language... Now it\'s searchable via the main search tool. No more waiting if
perldoc.com is down.
',
                               'mtime' => 1098903569,
                               'name' => 'perldoc',
                               'url' => 'perl/perldoc',
                               'file' => '/home/karpet/blog/perl/perldoc.txt',
                               'id' => 'perldoc.txt'
                             }, 'PodBlog::Model::Blog::Entry' )
                    ]
        };