use warnings;
use strict;
use SVN::Log;
use Data::Dumper;

my $revs = SVN::Log::retrieve('my://repo', 1, 5);
#print Dumper($revs);

print $revs->[0]{revision}, "\n";
print $revs->[0]{date    }, "\n";
print $revs->[0]{author  }, "\n";

__END__

1
2012-11-13 14:16:18
root