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]