App-CopyrightImage
view release on metacpan or search on metacpan
lib/App/CopyrightImage.pm view on Meta::CPAN
=head2 FUNCTIONS
=head3 imgcopyright(%opts)
Sets up various configurations, and then executes the EXIF changes to images
sent in.
We set the C<Copyright> EXIF tag to C<Copyright (C) YEAR by NAME>, where
C<YEAR> is auto-generated, and C<NAME> is sent in as an option (see below).
We also set the C<Creator> EXIF tag to C<NAME (EMAIL)>. If C<EMAIL> is not
sent in as an option, it, and the parens around it will be omitted.
Returns a hash reference with the following keys: C<ok> and C<fail>. Each key
contains an array reference. The former contains a list of the image names
that succeeded, and the latter, a list of image names that failed.
Options:
=head4 image
A string containing either an image filename (including full path if not
local), or the name of a directory containing images. If the value is a
directory, we'll operate on all images in that dir.
We will, by default, create a new sub-directory named C<ci> in the directory
found in the value, and if the directory is current working directory, we'll
create the sub directory there.
All updated images will be copied into the new C<ci> directory with the same
filename, with a <C>ci_</c> prepended to it.
Eg: C<"/home/user/Pictures">
=head4 check
We won't make any changes, we'll simply check all images specified with the
C<image> option, and if they are missing either C<Copyright> or C<Creator>
EXIF data, we'll print this information to C<STDOUT>.
=head4 name
A string containing the name you want associated with the copyright notice. It
will be used in both the C<Copyright> and C<Creator> EXIF tags.
Eg: C<"Steve Bertrand">
=head4 email
A string containing the email address of the copyright holder. This will be
included in the C<Creator> EXIF tag if sent in.
Eg: C<"steveb@cpan.org">
=head4 dst
A string containing the name of a directory to be used to store the manipulated
images. By default, we use the path sent in with the C<image> option.
Eg: C<"/home/user/backup">
=head4 remove
Bool. If set, we'll remove all copyright information on the image(s).
=head4 force
Bool. If set, if an image already has copyright information set, we'll
overwrite it. By default we skip these files.
=head1 AUTHOR
Steve Bertrand, C<< <steveb at cpan.org> >>
=head1 LICENSE AND COPYRIGHT
Copyright 2016,2017,2018 Steve Bertrand.
This program is free software; you can redistribute it and/or modify it
under the terms of either: the GNU General Public License as published
by the Free Software Foundation; or the Artistic License.
See L<http://dev.perl.org/licenses/> for more information.
( run in 0.504 second using v1.01-cache-2.11-cpan-df04353d9ac )