NAME
String::Copyright - Representation of text-based copyright statements
VERSION
Version 0.001
SYNOPSIS
use String::Copyright;
my $copyright = copyright(<<'END');
copr. © 1999,2000 Foo Barbaz <
[email protected]> and Acme Corp.
Copyright (c) 2001,2004 Foo (work address) <
[email protected]>
Copyright 2003, Foo B. and friends
© 2000, 2002 Foo Barbaz <
[email protected]>
END
print $copyright;
# Copyright 1999-2000 Foo Barbaz <
[email protected]> and Acme Corp.
# Copyright 2000, 2002 Foo Barbaz and Acme Corp.
# Copyright 2001, 2004 Foo (work address) <
[email protected]>
# Copyright 2003 Foo B. and friends
print $copyright->normalize(
alias => {
[ '
[email protected]' => [ '
[email protected]', '
[email protected]'] ] }
mangle => {
[ 's/Foo Barbaz\K(?= and .*)$/ <
[email protected]>/' ] }
);
# Copyright 1999-2000, 2002-2003 Acme Corp.
# Copyright 1999-2004 Foo Barbaz <
[email protected]>
# Copyright 2003 Foo B. and friends
DESCRIPTION
String::Copyright Parses common styles of copyright statements and
serializes in normalized format.
AUTHOR
Jonas Smedegaard `<
[email protected]>`
COPYRIGHT AND LICENSE
Derived from App::Licensecheck originally part of the KDE SDK, originally
introduced by Stefan Westerfeld `<
[email protected]>`; and on the script
licensecheck2dep5 part of Debian CDBS tool, written by Jonas Smedegaard.
Copyright © 2007, 2008 Adam D. Barratt
Copyright © 2005-2012, 2016 Jonas Smedegaard
This program is free software; you can redistribute it and/or modify it
under the terms of the GNU General Public License as published by the Free
Software Foundation; either version 3, or (at your option) any later
version.
This program is distributed in the hope that it will be useful, but
WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
for more details.
You should have received a copy of the GNU General Public License along
with this program. If not, see <
https://www.gnu.org/licenses/>.