gzip 아카이브의 후행 데이터를 얻는 방법?

후행 데이터가있는 gzip 아카이브가 있습니다. 내가 그것을 사용하여 압축을 풀면gzip -d " 감압 해제, 후행 가비지 무시 됨 "( gzip -t이러한 데이터가 있음을 감지하는 방법으로 사용될 수 있음)이 나옵니다.

이제이 쓰레기를 알고 싶습니다만, 이상하게도 그것을 추출 할 방법을 찾지 못했습니다. gzip -l --verbose아카이브의 "압축 된"크기는 파일의 크기 (즉, 후행 데이터 포함)이며 잘못되었으며 도움이되지 않습니다. file또한 도움이되지 않으므로 어떻게해야합니까?

후행 데이터를 얻는 방법을 알아 냈습니다.

나는 그것이 무겁게 기반으로, 후행 데이터 파일을 생성 펄 스크립트를 생성 https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=604617#10 :

#!/usr/bin/perl
use strict;
use warnings; 

use IO::Uncompress::Gunzip qw(:all);
use IO::File;

unshift(@ARGV, '-') unless -t STDIN;

my $input_file_name = shift;
my $output_file_name = shift;

if (! defined $input_file_name) {
  die <<END;
Usage:

  $0 ( GZIP_FILE | - ) [OUTPUT_FILE]

  ... | $0 [OUTPUT_FILE]

Extracts the trailing data of a gzip archive.
Outputs to stdout if no OUTPUT_FILE is given.
- as input file file causes it to read from stdin.

Examples:

  $0 archive.tgz trailing.bin

  cat archive.tgz | $0

END
}

my $in = new IO::File "<$input_file_name" or die "Couldn't open gzip file.\n";
gunzip $in => "/dev/null",
  TrailingData => my $trailing;
undef $in;

if (! defined $output_file_name) {
  print $trailing;
} else {
  open(my $fh, ">", $output_file_name) or die "Couldn't open output file.\n";
  print $fh $trailing;
  close $fh;
  print "Output file written.\n";
}