#!perl -w # Copyright (C) 2020 all contributors # License: AGPL-3.0+ eval { require PublicInbox::Gcf2 }; die "libgit2 development package or Inline::C missing for $0: $@\n" if $@; my $gcf2 = PublicInbox::Gcf2::new(); while () { chomp; if (m!\A/!) { # +/path/to/git-dir $gcf2->add_alternate("$_/objects"); } else { $gcf2->cat_oid(1, $_); } }