http://qs321.pair.com?node_id=885993

andreas1234567 has asked for the wisdom of the Perl Monks concerning the following question:

Given a list of modules, how do I produce a list of licences used? Is there a module on cpan that will take me half-way or even to the finish? Pseudo-code:
while(<DATA>) { print $_ . " - " . get_licence($_); } __DATA__ DateTime JSON::Schema Parse::Dia::SQL
Where the expected output would be:
DateTime - The Artistic License 2.0 JSON::Schema - The MIT Licence Parse::Dia::SQL - GNU General Public License.
--
No matter how great and destructive your problems may seem now, remember, you've probably only seen the tip of them. [1]

Replies are listed 'Best First'.
Re: Get licence from module
by toolic (Bishop) on Feb 03, 2011 at 14:22 UTC
      Yes, that might work: Output:
      $ perl analyse-poc.pl List-MoreUtils-0.22.tar.gz : Software::License::Perl_5 Log-Dispatch-2.22.tar.gz : perl Mail-Sendmail-0.79.tar.gz : no license found
      Thanks!
      --
      No matter how great and destructive your problems may seem now, remember, you've probably only seen the tip of them. [1]