#!/usr/bin/env perl # # Go and pull out of DBIx::Class::Optional::Dependencies all the "optional" # and testing deps that aren't hardcoded in Makefile.PL. # # Chris Weyl 2010 use 5.010; use strict; use warnings; # use the latest... use lib "$ARGV[0]/lib"; use DBIx::Class::Optional::Dependencies; # for use starting with DBIC 0.08120 #my %reqs = # %{ DBIx::Class::Optional::Dependencies::_all_optional_requirements() }; # # output our found deps :) #say '# from DBIx::Class::Optional::Dependencies'; #say "BuildRequires: perl($_)" . ($reqs{$_} ? " >= $reqs{$_}" : q{}) # for sort keys %reqs; my @groups = qw{ core cdbicompat deploy admin replicated }; sub _reqs { %{ DBIx::Class::Optional::Dependencies->req_list_for(@_) } } for my $group (@groups) { print "# optional deps for group: $group\n"; my %reqs = _reqs($group); for my $dep (sort keys %reqs) { my $line = "BuildRequires: perl($dep)"; $line .= " >= $reqs{$dep}" if $reqs{$dep}; print "$line\n"; } }