view release on metacpan or  search on metacpan

README  view on Meta::CPAN

DEPENDENCIES

Acme::MetaSyntactic



NOTE ON ENCODINGS

All files in this distribution should be considered to be in UTF-8 format.
Some standard documentation tools do not presently deal very well with this and
their output is mangled.  Give that it is the 21st century, this is considered
a bug in those tools and not in this distribution.


COPYRIGHT AND LICENCE

Copyright ©2007-2008, Elliot Shank

This library is free software; you can redistribute it and/or modify

t/author/copyright.t  view on Meta::CPAN

                             |  3pm       # doc ext
                             |  3         # doc ext
                             |  1         # doc ext
                            )
                    )$,xms);

    my $content = read_file($_);

    # Note: man pages will fail to match if the correct form of the
    # copyright symbol is used because the man page translators don't
    # handle UTF-8.
    my @copyright_years = $content =~ m/
                                       (?: copyright | \(c\) | © )
                                       \s*
                                       (?: \d{4} \\? - )?
                                       (\d{4})
                                       /gixms;
    if (0 < grep {$_ ne $this_year} @copyright_years) {
        fail("$_ copyrights: @copyright_years");
    } elsif (0 == @copyright_years) {
        pass("$_, no copyright found");