open(my $fh, '-|', tar => 'tzf', $archive)
    or die;

chomp( my @files = <$fh> );