Ævar Arnfjörð Bjarmason <avarab@xxxxxxxxx> 于2021年7月2日周五 下午9:30写道: > > > On Thu, Jul 01 2021, ZheNing Hu via GitGitGadget wrote: > > > From: ZheNing Hu <adlternative@xxxxxxxxx> > > > > Because the perl language can handle binary data correctly, > > add the function perl_quote_buf_with_len(), which can specify > > the length of the data and prevent the data from being truncated > > at '\0' to help `--format="%(raw)"` re-support `--perl`. > > > > Helped-by: Ævar Arnfjörð Bjarmason <avarab@xxxxxxxxx> > > Signed-off-by: ZheNing Hu <adlternative@xxxxxxxxx> > > Thanks! > > > -test_expect_success '%(raw) with --perl must fail' ' > > - test_must_fail git for-each-ref --format="%(raw)" --perl > > +test_expect_success '%(raw) with --perl' ' > > + git for-each-ref --format="\$name= %(raw); > > +print \"\$name\"" refs/myblobs/blob1 --perl | perl > actual && > > + cmp blob1 actual && > > + git for-each-ref --format="\$name= %(raw); > > +print \"\$name\"" refs/myblobs/blob3 --perl | perl > actual && > > + cmp blob3 actual && > > + git for-each-ref --format="\$name= %(raw); > > +print \"\$name\"" refs/myblobs/blob8 --perl | perl > actual && > > + cmp blob8 actual && > > + git for-each-ref --format="\$name= %(raw); > > +print \"\$name\"" refs/myblobs/first --perl | perl > actual && > > + cmp one actual && > > + git cat-file tree refs/mytrees/first > expected && > > + git for-each-ref --format="\$name= %(raw); > > +print \"\$name\"" refs/mytrees/first --perl | perl > actual && > > + cmp expected actual > > ' > > > > test_expect_success '%(raw) with --shell must fail' ' > > > Nit: Formatting can be "| perl >actual", not "| perl > actual", like the > usual style... Yeah, thanks. -- ZheNing Hu