小编Bra*_*nko的帖子

使用 Perl 模块 Image::ExifTool 从 PDF 读取元信息

我想使用 Perl 模块Image::ExifTool从 PDF 读取元信息。我需要使用交叉引用流(从 PDF 1.5 开始)处理 PDF,而其他完善的模块(如 PDF::API2 和 CAM::PDF)似乎不支持它们或支持有限。

无论如何,Image::ExifTool 显然读取了许多PDF 标签,但如果我运行以下代码:

use Image::ExifTool qw(:Public);
my $file = 'file.pdf';
my $exifTool = new Image::ExifTool;
$exifTool->ExtractInfo($file);
my @tagList = $exifTool->GetFoundTags('File');
for (@tagList){
    print "$_\n"
}
Run Code Online (Sandbox Code Playgroud)

我似乎无法获得比这些标签更多的内容:

ExifToolVersion
FileName
Directory
FileSize
FileModifyDate
FileAccessDate
FileCreateDate
FilePermissions
FileType
FileTypeExtension
MIMEType
PDFVersion
Linearized
Author
CreateDate
Creator (1)
ModifyDate
Producer (1)
Subject
Title (1)
XMPToolkit
CreateDate (1)
CreatorTool
ModifyDate (1)
MetadataDate
Producer
Format
Title
Description
Creator
DocumentID
InstanceID
PageLayout …
Run Code Online (Sandbox Code Playgroud)

pdf perl

5
推荐指数
1
解决办法
492
查看次数

标签 统计

pdf ×1

perl ×1