#!/usr/bin/perl -w

use Arch::Session;

my $session = Arch::Session->new;
my $branch = 'migo@homemail.com--Perl-GPL/arch-perl--devel';

my $tree = $session->get_tree($branch, "/tmp/arch-perl");
print "Got the latest snapshot of version ", $tree->get_version, "\n";