.\" Automatically generated by Pod::Man 4.10 (Pod::Simple 3.35) .\" .\" Standard preamble: .\" ======================================================================== .de Sp \" Vertical space (when we can't use .PP) .if t .sp .5v .if n .sp .. .de Vb \" Begin verbatim text .ft CW .nf .ne \\$1 .. .de Ve \" End verbatim text .ft R .fi .. .\" Set up some character translations and predefined strings. \*(-- will .\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left .\" double quote, and \*(R" will give a right double quote. \*(C+ will .\" give a nicer C++. Capital omega is used to do unbreakable dashes and .\" therefore won't be available. \*(C` and \*(C' expand to `' in nroff, .\" nothing in troff, for use with C<>. .tr \(*W- .ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p' .ie n \{\ . ds -- \(*W- . ds PI pi . if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch . if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\" diablo 12 pitch . ds L" "" . ds R" "" . ds C` "" . ds C' "" 'br\} .el\{\ . ds -- \|\(em\| . ds PI \(*p . ds L" `` . ds R" '' . ds C` . ds C' 'br\} .\" .\" Escape single quotes in literal strings from groff's Unicode transform. .ie \n(.g .ds Aq \(aq .el .ds Aq ' .\" .\" If the F register is >0, we'll generate index entries on stderr for .\" titles (.TH), headers (.SH), subsections (.SS), items (.Ip), and index .\" entries marked with X<> in POD. Of course, you'll have to process the .\" output yourself in some meaningful fashion. .\" .\" Avoid warning from groff about undefined register 'F'. .de IX .. .nr rF 0 .if \n(.g .if rF .nr rF 1 .if (\n(rF:(\n(.g==0)) \{\ . if \nF \{\ . de IX . tm Index:\\$1\t\\n%\t"\\$2" .. . if !\nF==2 \{\ . nr % 0 . nr F 2 . \} . \} .\} .rr rF .\" .\" Accent mark definitions (@(#)ms.acc 1.5 88/02/08 SMI; from UCB 4.2). .\" Fear. Run. Save yourself. No user-serviceable parts. . \" fudge factors for nroff and troff .if n \{\ . ds #H 0 . ds #V .8m . ds #F .3m . ds #[ \f1 . ds #] \fP .\} .if t \{\ . ds #H ((1u-(\\\\n(.fu%2u))*.13m) . ds #V .6m . ds #F 0 . ds #[ \& . ds #] \& .\} . \" simple accents for nroff and troff .if n \{\ . ds ' \& . ds ` \& . ds ^ \& . ds , \& . ds ~ ~ . ds / .\} .if t \{\ . ds ' \\k:\h'-(\\n(.wu*8/10-\*(#H)'\'\h"|\\n:u" . ds ` \\k:\h'-(\\n(.wu*8/10-\*(#H)'\`\h'|\\n:u' . ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'^\h'|\\n:u' . ds , \\k:\h'-(\\n(.wu*8/10)',\h'|\\n:u' . ds ~ \\k:\h'-(\\n(.wu-\*(#H-.1m)'~\h'|\\n:u' . ds / \\k:\h'-(\\n(.wu*8/10-\*(#H)'\z\(sl\h'|\\n:u' .\} . \" troff and (daisy-wheel) nroff accents .ds : \\k:\h'-(\\n(.wu*8/10-\*(#H+.1m+\*(#F)'\v'-\*(#V'\z.\h'.2m+\*(#F'.\h'|\\n:u'\v'\*(#V' .ds 8 \h'\*(#H'\(*b\h'-\*(#H' .ds o \\k:\h'-(\\n(.wu+\w'\(de'u-\*(#H)/2u'\v'-.3n'\*(#[\z\(de\v'.3n'\h'|\\n:u'\*(#] .ds d- \h'\*(#H'\(pd\h'-\w'~'u'\v'-.25m'\f2\(hy\fP\v'.25m'\h'-\*(#H' .ds D- D\\k:\h'-\w'D'u'\v'-.11m'\z\(hy\v'.11m'\h'|\\n:u' .ds th \*(#[\v'.3m'\s+1I\s-1\v'-.3m'\h'-(\w'I'u*2/3)'\s-1o\s+1\*(#] .ds Th \*(#[\s+2I\s-2\h'-\w'I'u*3/5'\v'-.3m'o\v'.3m'\*(#] .ds ae a\h'-(\w'a'u*4/10)'e .ds Ae A\h'-(\w'A'u*4/10)'E . \" corrections for vroff .if v .ds ~ \\k:\h'-(\\n(.wu*9/10-\*(#H)'\s-2\u~\d\s+2\h'|\\n:u' .if v .ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'\v'-.4m'^\v'.4m'\h'|\\n:u' . \" for low resolution devices (crt and lpr) .if \n(.H>23 .if \n(.V>19 \ \{\ . ds : e . ds 8 ss . ds o a . ds d- d\h'-1'\(ga . ds D- D\h'-1'\(hy . ds th \o'bp' . ds Th \o'LP' . ds ae ae . ds Ae AE .\} .rm #[ #] #H #V #F C .\" ======================================================================== .\" .IX Title "Debian::LicenseReconcile::Filter 3pm" .TH Debian::LicenseReconcile::Filter 3pm "2019-07-15" "perl v5.28.1" "User Contributed Perl Documentation" .\" For nroff, turn off justification. Always turn off hyphenation; it makes .\" way too many mistakes in technical documents. .if n .ad l .nh .SH "NAME" Debian::LicenseReconcile::Filter \- abstract interface to license info .SH "VERSION" .IX Header "VERSION" Version 0.17 .SH "SYNOPSIS" .IX Header "SYNOPSIS" .Vb 1 \& use Debian::LicenseReconcile::Filter; \& \& my $filter = Debian::LicenseReconcile::Filter\->new(arg1=>"blah",...); \& my @info = $filter\->get_info(@files); .Ve .SH "SUBROUTINES/METHODS" .IX Header "SUBROUTINES/METHODS" .SS "new" .IX Subsection "new" This constructor takes key value pairs and returns the correspondingly blessed object. .SS "get_info" .IX Subsection "get_info" Returns a list of hash references describing copyright and license information that should be checked against the copyright target. .SS "directory" .IX Subsection "directory" Returns the search directory as set in the constructor. .SS "files_remaining" .IX Subsection "files_remaining" Returns the files to be checked as set in the constructor. .SS "changelog" .IX Subsection "changelog" Returns the Parse::DebianChangelog as set in the constructor. .SS "config" .IX Subsection "config" Returns the config data as set in the constructor. .SS "licensecheck" .IX Subsection "licensecheck" Returns the Debian::LicenseReconcile::LicenseCheck object as set in the constructor. .SS "name" .IX Subsection "name" Returns the name set in the constructor. .SS "find_rule" .IX Subsection "find_rule" This is a helper method designed to allow derived classes implement rules based semantics. It takes a file name and an array ref to a sequence of rules. Each rule is a hash ref, which may contain the following fields: .IP "\- Glob (optional) \- a file glob to limit which files the rule applies to." 4 .IX Item "- Glob (optional) - a file glob to limit which files the rule applies to." .PD 0 .IP "\- Contains (optional) \- a piece of text which the file must contain for the rule to apply." 4 .IX Item "- Contains (optional) - a piece of text which the file must contain for the rule to apply." .IP "\- Matches (optional) \- an extended regular expression which the file contents must match for the rule to apply." 4 .IX Item "- Matches (optional) - an extended regular expression which the file contents must match for the rule to apply." .IP "\- MMagic (optional) \- a string which must equal the magic value obtained from File::MMagic for the rule to apply." 4 .IX Item "- MMagic (optional) - a string which must equal the magic value obtained from File::MMagic for the rule to apply." .IP "\- MaxVersion (optional) \- an upstream version string after which the rule will not be applied. This is recommended unless you are certain that the rule is robust so that the rule will be regularly reviewed." 4 .IX Item "- MaxVersion (optional) - an upstream version string after which the rule will not be applied. This is recommended unless you are certain that the rule is robust so that the rule will be regularly reviewed." .IP "\- VerifyLicense (optional) \- a string which must be present in the license portion of licensecheck output." 4 .IX Item "- VerifyLicense (optional) - a string which must be present in the license portion of licensecheck output." .PD .PP The first rule which matches the file is returned. If no rule matches then undef is returned. .SH "AUTHOR" .IX Header "AUTHOR" Nicholas Bamber, \f(CW\*(C`\*(C'\fR .SH "LICENSE AND COPYRIGHT" .IX Header "LICENSE AND COPYRIGHT" Copyright 2012, 2015, Nicholas Bamber \f(CW\*(C`\*(C'\fR. .PP This program is free software; you can redistribute it and/or modify it under the terms of either: the \s-1GNU\s0 General Public License as published by the Free Software Foundation; or the Artistic License. .PP See http://dev.perl.org/licenses/ for more information.