("git", "ls-remote", $clonePath, "refs/heads/".$branch));
    die "Cannot get head revision of Git branch '$branch' at `$uri':\n$stderr" unless $res1;

        ("git", "ls-remote", $clonePath, $branch));
    
    die "Cannot get head revision of Git branch '$branch' at `$uri':\n$stderr" unless $res1 ;

    (my $revision, my $ref) = split ' ', $stdout;

    my ($first) = split /\n/, $stdout;
    (my $revision, my $ref) = split ' ', $first;