File::Sticker::Writer::Exif - write and standardize meta-data from EXIF file
version 1.0603
use File::Sticker::Writer::Exif; my $obj = File::Sticker::Writer::Exif->new(%args); my %meta = $obj->write_meta(%args);
This will write meta-data from EXIF files, and standardize it to a common nomenclature, such as "tags" for things called tags, or Keywords or Subject etc.
Used for debugging info
The priority of this writer. Writers with higher priority get tried first.
If this writer can be used for the given file, then this returns true. File must be one of: PDF or an image which is not a GIF. (GIF files need to be treated separately) (ExifTool can't write to EPUB)
Returns the fields which this writer knows about.
my $known_fields = $writer->known_fields();
Returns the fields which this writer knows about, which can't be overwritten, but are allowed to be "wanted" fields. Things like file-size etc.
my $readonly_fields = $writer->readonly_fields();
Private interface.
Overwrite the given field. This does no checking.
$writer->replace_one_field(filename=>$filename,field=>$field,value=>$value);
Completely remove the given field. This does no checking.
$writer->delete_field_from_file(filename=>$filename,field=>$field);
If the file is a directory, look for a cover file.
my $real_file = $writer->_get_the_real_file(filename=>$filename);
Read the freeform data as YAML data from the UserComment field
my $ydata = $self->_read_freeform_data(exif=>$exif);
Write the freeform data as YAML data from the UserComment field This overwrites whatever is there, it does not check.
$self->_read_freeform_data(newdata=>\%newdata,exif=>$exif);
Please report any bugs or feature requests to the author.
To install File::Sticker, copy and paste the appropriate command in to your terminal.
cpanm
cpanm File::Sticker
CPAN shell
perl -MCPAN -e shell install File::Sticker
For more information on module installation, please visit the detailed CPAN module installation guide.