diff options
- #!/usr/bin/perl
- # extract XMP data from PDF file and unwrap as generic RDF/XML
- use v5.36;
- use strict;
- use PDF::API2;
- my $xml = PDF::API2->open( $ARGV[0] )->xml_metadata();
- # strip noise
- $xml =~ s,^PDF version of requested feature [^<]*,,;ion value='10'>10
space: mode:
Diffstat (limited to '_templates')
0 files changed, 0 insertions, 0 deletions