Attachment 69465 Details for Bug 19735 – Bug 19735: Script to generate cpanfile (DO NOT PUSH)

[patch] Bug 19735: Script to generate cpanfile (DO NOT PUSH)

Bug-19735-Script-to-generate-cpanfile-DO-NOT-PUSH.patch (text/plain), 1.17 KB, created by Julian Maurice on 2017-12-02 08:58:15 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Julian Maurice

Created: 2017-12-02 08:58:15 UTC

Size: 1.17 KB

patch

obsolete

>From 2173279b2afcd0b907a9e03cda0e49b000e105e9 Mon Sep 17 00:00:00 2001
>From: Julian Maurice <julian.maurice@biblibre.com>
>Date: Thu, 26 Oct 2017 16:24:27 +0000
>Subject: [PATCH] Bug 19735: Script to generate cpanfile (DO NOT PUSH)
>
>For testing purposes only
>---
> misc/devel/generate_cpanfile.pl | 21 +++++++++++++++++++++
> 1 file changed, 21 insertions(+)
> create mode 100755 misc/devel/generate_cpanfile.pl
>
>diff --git a/misc/devel/generate_cpanfile.pl b/misc/devel/generate_cpanfile.pl
>new file mode 100755
>index 0000000000..2a90334b30
>--- /dev/null
>+++ b/misc/devel/generate_cpanfile.pl
>@@ -0,0 +1,21 @@
>+#!/usr/bin/env perl
>+
>+use Modern::Perl;
>+
>+use Module::CPANfile;
>+
>+use C4::Installer::PerlDependencies;
>+
>+my $deps = $C4::Installer::PerlDependencies::PERL_DEPS;
>+my $prereqs = {};
>+while (my ($module, $req) = each %$deps) {
>+    my $type = $req->{required} ? 'requires' : 'recommends';
>+
>+    $prereqs->{runtime}->{$type}->{$module} = $req->{min_ver};
>+}
>+
>+$prereqs->{runtime}->{requires}->{'Module::CPANfile'} = '1.1000';
>+$prereqs->{runtime}->{requires}->{'CPAN::Meta'} = '2.150006';
>+
>+my $cpanfile = Module::CPANfile->from_prereqs($prereqs);
>+print $cpanfile->to_string;
>-- 
>2.11.0

Actions: View | Diff | Splinter Review

Attachments on bug 19735: 69465 | 69466 | 73837 | 73838 | 81612 | 97484 | 97485 | 98568 | 98569 | 98570 | 98576 | 98577 | 98636 | 98637 | 98638 | 98639 | 98640 | 98743 | 98744 | 98745 | 98746 | 98747 | 98748