Git::Annex::BatchCommand - Perl interface to git-annex --batch commands


version 0.007


  # you should not instantiate this class yourself; use Git::Annex::batch
  my $annex = Git::Annex->new("/home/spwhitton/annex");
  my $batch = $annex->batch("find", "--not", "--in=here");

  # see git-annex-find(1) -- `git annex find --batch --not --in here`
  # prints an empty string for each file which is not present
  say "foo/bar is not present in this repo" unless $batch->ask("foo/bar");


This class can be used to run git-annex commands which take the --batch option. You can feed the command lines of input and you will get back git-annex's responses.

The main point of using --batch commands from Perl is to keep git-annex running rather than repeatedly executing new git-annex processes to perform queries or request changes.


new($annex, $cmd, @args)

Initialise a batch process in Git::Annex $annex, running git-annex subcommand $cmd (e.g. setpresentkey) with arguments @args.

You should use Git::Annex::batch in preference to this method.

say($input, ...)

Say a line or lines of input to the batch command's standard input. Trailing line breaks in $input are optional.

In list context, returns a list of git-annex's responses to the items of input, chomped. In scalar context, returns the last of git-annex's responses, chomped.

ask($input, ...)

Synonym for say method.


Kill and restart the --batch command.

This is sometimes needed to ensure the --batch command picks up changes made to the git-annex branch.


Sean Whitton <>


This software is Copyright (c) 2019-2021 by Sean Whitton <>.

This is free software, licensed under:

  The GNU General Public License, Version 3, June 2007