#!/usr/local/bin/perl -w
###########################################
# dropbox-dump -- Dump dropbox content
# Mike Schilli, 2011 (m@perlmeister.com)
###########################################
use strict;
use MyDropbox;
use Data::Dumper;

my $box = MyDropbox->new();
$box->context( "dropbox" );

my $href = $box->list(
    "/Photos");

$Data::Dumper::Indent = 1;
print Dumper( $href );