1 package DBIx::Class::Optional::Dependencies;
8 # NO EXTERNAL NON-5.8.1 CORE DEPENDENCIES EVER (e.g. C::A::G)
9 # This module is to be loaded by Makefile.PM on a pristine system
11 # POD is generated automatically by calling _gen_pod from the
12 # Makefile.PL in $AUTHOR mode
14 # NOTE: the rationale for 2 JSON::Any versions is that
15 # we need the newer only to work around JSON::XS, which
16 # itself is an optional dep
18 'JSON::Any' => '1.23',
20 my $test_and_dist_json_any = {
21 'JSON::Any' => '1.31',
26 'MooseX::Types' => '0.21',
27 'MooseX::Types::LoadableClass' => '0.011',
37 'MooseX::Types::Path::Class' => '0.05',
38 'MooseX::Types::JSON' => '0.02',
44 'Getopt::Long::Descriptive' => '0.081',
45 'Text::CSV' => '1.16',
48 my $datetime_basic = {
50 'DateTime::Format::Strptime' => '1.2',
54 'Math::BigInt' => '1.80',
55 'Math::Base36' => '0.07',
64 my $rdbms_mssql_odbc = {
67 my $rdbms_mssql_sybase = {
70 my $rdbms_mssql_ado = {
73 my $rdbms_msaccess_odbc = {
76 my $rdbms_msaccess_ado = {
95 my $rdbms_informix = {
96 'DBD::Informix' => '0',
98 my $rdbms_sqlanywhere = {
99 'DBD::SQLAnywhere' => '0',
101 my $rdbms_sqlanywhere_odbc = {
104 my $rdbms_firebird = {
105 'DBD::Firebird' => '0',
107 my $rdbms_firebird_interbase = {
108 'DBD::InterBase' => '0',
110 my $rdbms_firebird_odbc = {
118 title => 'Storage::Replicated',
119 desc => 'Modules required for L<DBIx::Class::Storage::DBI::Replicated>',
126 'Test::Moose' => '0',
136 title => 'DBIx::Class::Admin',
137 desc => 'Modules required for the DBIx::Class administrative library',
146 title => 'dbicadmin',
147 desc => 'Modules required for the CLI DBIx::Class interface dbicadmin',
153 'SQL::Translator' => '0.11018',
156 title => 'Storage::DBI::deploy()',
157 desc => 'Modules required for L<DBIx::Class::Storage::DBI/deployment_statements> and L<DBIx::Class::Schema/deploy>',
162 req => $id_shortener,
165 test_component_accessor => {
167 'Class::Unload' => '0.07',
173 'Test::Pod' => '1.42',
177 test_podcoverage => {
179 'Test::Pod::Coverage' => '1.08',
180 'Pod::Coverage' => '0.20',
186 'Test::EOL' => '1.0',
187 'Test::NoTabs' => '0.9',
193 'Test::Strict' => '0.20',
197 test_prettydebug => {
198 req => $min_json_any,
201 test_admin_script => {
204 %$test_and_dist_json_any,
207 'Cpanel::JSON::XS' => 0,
210 # for t/admin/10script.t
211 ? ('Win32::ShellQuote' => 0)
212 # DWIW does not compile (./configure even) on win32
213 : ('JSON::DWIW' => 0 )
218 test_leaks_heavy => {
220 'Class::MethodCache' => '0.02',
221 'PadWalker' => '1.06',
226 req => $datetime_basic,
234 'DateTime::Format::SQLite' => '0',
241 # t/inflate/datetime_mysql.t
242 # (doesn't need Mysql itself)
243 'DateTime::Format::MySQL' => '0',
250 # t/inflate/datetime_pg.t
251 # (doesn't need PG itself)
252 'DateTime::Format::Pg' => '0.16004',
258 'Class::DBI::Plugin::DeepAbstractSearch' => '0',
260 'Time::Piece::MySQL' => '0',
261 'Date::Simple' => '3.03',
265 # this is just for completeness as SQLite
266 # is a core dep of DBIC for testing
272 title => 'SQLite support',
273 desc => 'Modules required to connect to SQLite',
279 # when changing this list make sure to adjust xt/optional_deps.t
283 title => 'PostgreSQL support',
284 desc => 'Modules required to connect to PostgreSQL',
288 rdbms_mssql_odbc => {
293 title => 'MSSQL support via DBD::ODBC',
294 desc => 'Modules required to connect to MSSQL via DBD::ODBC',
298 rdbms_mssql_sybase => {
300 %$rdbms_mssql_sybase,
303 title => 'MSSQL support via DBD::Sybase',
304 desc => 'Modules required to connect to MSSQL via DBD::Sybase',
313 title => 'MSSQL support via DBD::ADO (Windows only)',
314 desc => 'Modules required to connect to MSSQL via DBD::ADO. This particular DBD is available on Windows only',
318 rdbms_msaccess_odbc => {
320 %$rdbms_msaccess_odbc,
323 title => 'MS Access support via DBD::ODBC',
324 desc => 'Modules required to connect to MS Access via DBD::ODBC',
328 rdbms_msaccess_ado => {
330 %$rdbms_msaccess_ado,
333 title => 'MS Access support via DBD::ADO (Windows only)',
334 desc => 'Modules required to connect to MS Access via DBD::ADO. This particular DBD is available on Windows only',
343 title => 'MySQL support',
344 desc => 'Modules required to connect to MySQL',
353 title => 'Oracle support',
354 desc => 'Modules required to connect to Oracle',
363 title => 'Sybase ASE support',
364 desc => 'Modules required to connect to Sybase ASE',
373 title => 'DB2 support',
374 desc => 'Modules required to connect to DB2',
383 title => 'DB2 on AS/400 support',
384 desc => 'Modules required to connect to DB2 on AS/400',
393 title => 'Informix support',
394 desc => 'Modules required to connect to Informix',
398 rdbms_sqlanywhere => {
403 title => 'SQLAnywhere support',
404 desc => 'Modules required to connect to SQLAnywhere',
408 rdbms_sqlanywhere_odbc => {
410 %$rdbms_sqlanywhere_odbc,
413 title => 'SQLAnywhere support via DBD::ODBC',
414 desc => 'Modules required to connect to SQLAnywhere via DBD::ODBC',
423 title => 'Firebird support',
424 desc => 'Modules required to connect to Firebird',
428 rdbms_firebird_interbase => {
430 %$rdbms_firebird_interbase,
433 title => 'Firebird support via DBD::InterBase',
434 desc => 'Modules required to connect to Firebird via DBD::InterBase',
438 rdbms_firebird_odbc => {
440 %$rdbms_firebird_odbc,
443 title => 'Firebird support via DBD::ODBC',
444 desc => 'Modules required to connect to Firebird via DBD::ODBC',
450 DBICTEST_PG_DSN => 1,
451 DBICTEST_PG_USER => 0,
452 DBICTEST_PG_PASS => 0,
455 # the order does matter because the rdbms support group might require
456 # a different version that the test group
458 # when changing this list make sure to adjust xt/optional_deps.t
460 'DBD::Pg' => '2.009002', # specific version to test bytea
464 test_rdbms_mssql_odbc => {
466 DBICTEST_MSSQL_ODBC_DSN => 1,
467 DBICTEST_MSSQL_ODBC_USER => 0,
468 DBICTEST_MSSQL_ODBC_PASS => 0,
475 test_rdbms_mssql_ado => {
477 DBICTEST_MSSQL_ADO_DSN => 1,
478 DBICTEST_MSSQL_ADO_USER => 0,
479 DBICTEST_MSSQL_ADO_PASS => 0,
486 test_rdbms_mssql_sybase => {
488 DBICTEST_MSSQL_DSN => 1,
489 DBICTEST_MSSQL_USER => 0,
490 DBICTEST_MSSQL_PASS => 0,
493 %$rdbms_mssql_sybase,
497 test_rdbms_msaccess_odbc => {
499 DBICTEST_MSACCESS_ODBC_DSN => 1,
500 DBICTEST_MSACCESS_ODBC_USER => 0,
501 DBICTEST_MSACCESS_ODBC_PASS => 0,
504 %$rdbms_msaccess_odbc,
510 test_rdbms_msaccess_ado => {
512 DBICTEST_MSACCESS_ADO_DSN => 1,
513 DBICTEST_MSACCESS_ADO_USER => 0,
514 DBICTEST_MSACCESS_ADO_PASS => 0,
517 %$rdbms_msaccess_ado,
523 test_rdbms_mysql => {
525 DBICTEST_MYSQL_DSN => 1,
526 DBICTEST_MYSQL_USER => 0,
527 DBICTEST_MYSQL_PASS => 0,
534 test_rdbms_oracle => {
536 DBICTEST_ORA_DSN => 1,
537 DBICTEST_ORA_USER => 0,
538 DBICTEST_ORA_PASS => 0,
542 'DateTime::Format::Oracle' => '0',
543 'DBD::Oracle' => '1.24',
549 DBICTEST_SYBASE_DSN => 1,
550 DBICTEST_SYBASE_USER => 0,
551 DBICTEST_SYBASE_PASS => 0,
560 DBICTEST_DB2_DSN => 1,
561 DBICTEST_DB2_USER => 0,
562 DBICTEST_DB2_PASS => 0,
569 test_rdbms_db2_400 => {
571 DBICTEST_DB2_400_DSN => 1,
572 DBICTEST_DB2_400_USER => 0,
573 DBICTEST_DB2_400_PASS => 0,
580 test_rdbms_informix => {
582 DBICTEST_INFORMIX_DSN => 1,
583 DBICTEST_INFORMIX_USER => 0,
584 DBICTEST_INFORMIX_PASS => 0,
591 test_rdbms_sqlanywhere => {
593 DBICTEST_SQLANYWHERE_DSN => 1,
594 DBICTEST_SQLANYWHERE_USER => 0,
595 DBICTEST_SQLANYWHERE_PASS => 0,
602 test_rdbms_sqlanywhere_odbc => {
604 DBICTEST_SQLANYWHERE_ODBC_DSN => 1,
605 DBICTEST_SQLANYWHERE_ODBC_USER => 0,
606 DBICTEST_SQLANYWHERE_ODBC_PASS => 0,
609 %$rdbms_sqlanywhere_odbc,
613 test_rdbms_firebird => {
615 DBICTEST_FIREBIRD_DSN => 1,
616 DBICTEST_FIREBIRD_USER => 0,
617 DBICTEST_FIREBIRD_PASS => 0,
624 test_rdbms_firebird_interbase => {
626 DBICTEST_FIREBIRD_INTERBASE_DSN => 1,
627 DBICTEST_FIREBIRD_INTERBASE_USER => 0,
628 DBICTEST_FIREBIRD_INTERBASE_PASS => 0,
631 %$rdbms_firebird_interbase,
635 test_rdbms_firebird_odbc => {
637 DBICTEST_FIREBIRD_ODBC_DSN => 1,
638 DBICTEST_FIREBIRD_ODBC_USER => 0,
639 DBICTEST_FIREBIRD_ODBC_PASS => 0,
642 %$rdbms_firebird_odbc,
648 DBICTEST_MEMCACHED => 1,
651 'Cache::Memcached' => 0,
657 %$test_and_dist_json_any,
658 'ExtUtils::MakeMaker' => '6.64',
659 'Pod::Inherit' => '0.91',
665 'CPAN::Uploader' => '0.103001',
675 # OO for (mistakenly considered) ease of extensibility, not due to any need to
676 # carry state of any sort. This API is currently used outside, so leave as-is.
677 # FIXME - make sure to not propagate this further if module is extracted as a
678 # standalone library - keep the stupidity to a DBIC-secific shim!
681 shift->_groups_to_reqs(@_)->{effective_modreqs};
684 sub modreq_list_for {
685 shift->_groups_to_reqs(@_)->{modreqs};
690 { $_ => $_[0]->_groups_to_reqs($_) }
695 sub req_errorlist_for { shift->modreq_errorlist_for(@_) } # deprecated
696 sub modreq_errorlist_for {
698 $self->_errorlist_for_modreqs( $self->_groups_to_reqs(@_)->{modreqs} );
702 shift->req_missing_for(@_) ? 0 : 1;
705 sub req_missing_for {
708 my $reqs = $self->_groups_to_reqs(@_);
709 my $mods_missing = $self->modreq_missing_for(@_);
714 ! $reqs->{missing_envvars}
717 my @res = $mods_missing || ();
719 push @res, 'the following group(s) of environment variables: ' . join ' and ', map
720 { __envvar_group_desc($_) }
721 @{$reqs->{missing_envvars}}
722 if $reqs->{missing_envvars};
725 ( join ' as well as ', @res )
727 ( $reqs->{modreqs_fully_documented} ? " (see @{[ ref $self || $self ]} documentation for details)" : '' ),
731 sub modreq_missing_for {
734 my $reqs = $self->_groups_to_reqs(@_);
735 my $modreq_errors = $self->_errorlist_for_modreqs($reqs->{modreqs})
739 { $reqs->{modreqs}{$_} ? qq("$_~>=$reqs->{modreqs}{$_}") : $_ }
740 sort { lc($a) cmp lc($b) } keys %$modreq_errors
744 sub die_unless_req_ok_for {
745 if (my $err = shift->req_missing_for(@_) ) {
746 die "Unable to continue due to missing requirements: $err\n";
752 ### Private functions
754 # potentially shorten group desc
755 sub __envvar_group_desc {
758 my (@res, $last_prefix);
759 while (my $ev = shift @envs) {
760 my ($pref, $sep, $suff) = split / ([\_\-]) (?= [^\_\-]+ \z )/x, $ev;
762 if ( defined $sep and ($last_prefix||'') eq $pref ) {
763 push @res, "...${sep}${suff}"
769 $last_prefix = $pref if $sep;
778 our %req_unavailability_cache;
780 # this method is just a lister and envvar/metadata checker - it does not try to load anything
781 sub _groups_to_reqs {
782 my ($self, $groups) = @_;
784 $groups = [ $groups || () ]
785 unless ref $groups eq 'ARRAY';
787 croak "@{[ (caller(1))[3] ]}() expects a requirement group name or arrayref of group names"
792 modreqs_fully_documented => 1,
795 for my $group ( @$groups ) {
797 $group =~ /\A [A-Za-z][0-9A-Z_a-z]* \z/x
798 or croak "Invalid requirement group name '$group': only ascii alphanumerics and _ are allowed";
800 my $group_reqs = ($dbic_reqs->{$group}||{})->{req}
801 or croak "Requirement group '$group' is not defined";
804 for (keys %$group_reqs) {
806 $_ =~ /\A [A-Z_a-z][0-9A-Z_a-z]* (?:::[0-9A-Z_a-z]+)* \z /x
807 or croak "Requirement '$_' in group '$group' is not a valid module name";
809 # !!!DO NOT CHANGE!!!
810 # remember - version.pm may not be available on the system
811 croak "Requirement '$_' in group '$group' specifies an invalid version '$group_reqs->{$_}' (only plain non-underscored floating point decimals are supported)"
812 if ( ($group_reqs->{$_}||0) !~ / \A [0-9]+ (?: \. [0-9]+ )? \z /x );
815 # check if we have all required envvars if such names are defined
816 my ($some_envs_required, $some_envs_missing);
817 if (my @e = @{$dbic_reqs->{$group}{env} || [] }) {
819 croak "Unexpected 'env' attribute under group '$group' (only allowed in test_* groups)"
820 unless $group =~ /^test_/;
822 croak "Unexpected *odd* list in 'env' under group '$group'"
825 my @group_envnames_list;
827 # deconstruct the whole thing
829 push @group_envnames_list, my $envname = shift @e;
831 # env required or not
832 next unless shift @e;
834 $some_envs_required ||= 1;
836 $some_envs_missing ||= (
837 ! defined $ENV{$envname}
839 ! length $ENV{$envname}
843 croak "None of the envvars in group '$group' declared as required, making the requirement moot"
844 unless $some_envs_required;
846 push @{$ret->{missing_envvars}}, \@group_envnames_list if $some_envs_missing;
849 # assemble into the final ret
852 $some_envs_missing ? () : 'effective_modreqs'
854 for my $mod (keys %$group_reqs) {
856 $ret->{$type}{$mod} = $group_reqs->{$mod}||0 if (
858 ! exists $ret->{$type}{$mod}
860 # we sanitized the version to be numeric above - we can just -gt it
861 ($group_reqs->{$mod}||0) > $ret->{$type}{$mod}
867 $ret->{modreqs_fully_documented} &&= !!$dbic_reqs->{$group}{pod};
874 # this method tries to load specified modreqs and returns a hashref of
875 # module/loaderror pairs for anything that failed
876 sub _errorlist_for_modreqs {
877 # args supposedly already went through _groups_to_reqs and are therefore sanitized
878 # safe to eval at will
879 my ($self, $reqs) = @_;
883 for my $m ( keys %$reqs ) {
886 if (! exists $req_unavailability_cache{$m}{$v} ) {
888 eval( "require $m;" . ( $v ? "$m->VERSION(q($v))" : '' ) );
889 $req_unavailability_cache{$m}{$v} = $@;
892 $ret->{$m} = $req_unavailability_cache{$m}{$v}
893 if $req_unavailability_cache{$m}{$v};
900 # This is to be called by the author only (automatically in Makefile.PL)
902 my ($class, $distver, $pod_dir) = @_;
904 die "No POD root dir supplied" unless $pod_dir;
907 eval { require DBIx::Class; DBIx::Class->VERSION; }
910 "\n\n---------------------------------------------------------------------\n" .
911 'Unable to load core DBIx::Class module to determine current version, '.
912 'possibly due to missing dependencies. Author-mode autodocumentation ' .
914 "\n\n---------------------------------------------------------------------\n"
917 # do not ask for a recent version, use 1.x API calls
918 # this *may* execute on a smoker with old perl or whatnot
921 (my $modfn = __PACKAGE__ . '.pm') =~ s|::|/|g;
923 (my $podfn = "$pod_dir/$modfn") =~ s/\.pm$/\.pod/;
924 (my $dir = $podfn) =~ s|/[^/]+$||;
926 File::Path::mkpath([$dir]);
928 my $sqltver = $class->req_list_for('deploy')->{'SQL::Translator'}
929 or die "Hrmm? No sqlt dep?";
937 push @chunks, <<"EOC";
938 #########################################################################
939 ##################### A U T O G E N E R A T E D ########################
940 #########################################################################
942 # The contents of this POD file are auto-generated. Any changes you make
943 # will be lost. If you need to change the generated text edit _gen_pod()
944 # at the end of $modfn
949 $class - Optional module dependency specifications (for module authors)
956 push @chunks, <<"EOC";
959 Somewhere in your build-file (e.g. L<ExtUtils::MakeMaker>'s F<Makefile.PL>):
963 \$EUMM_ARGS{CONFIGURE_REQUIRES} = {
964 \%{ \$EUMM_ARGS{CONFIGURE_REQUIRES} || {} },
965 'DBIx::Class' => '$distver',
970 my %DBIC_DEPLOY_DEPS = %{ eval {
972 $class->req_list_for('deploy');
975 \$EUMM_ARGS{PREREQ_PM} = {
977 \%{ \$EUMM_ARGS{PREREQ_PM} || {} },
982 ExtUtils::MakeMaker::WriteMakefile(\%EUMM_ARGS);
984 B<Note>: The C<eval> protection within the example is due to support for
985 requirements during L<the C<configure> build phase|CPAN::Meta::Spec/Phases>
986 not being available on a sufficient portion of production installations of
987 Perl. Robust support for such dependency requirements is available in the
988 L<CPAN> installer only since version C<1.94_56> first made available for
989 production with perl version C<5.12>. It is the belief of the current
990 maintainer that support for requirements during the C<configure> build phase
991 will not be sufficiently ubiquitous until the B<year 2020> at the earliest,
992 hence the extra care demonstrated above. It should also be noted that some
993 3rd party installers (e.g. L<cpanminus|App::cpanminus>) do the right thing
994 with configure requirements independent from the versions of perl and CPAN
1000 #@@ DESCRIPTION HEADING
1002 push @chunks, <<'EOC';
1005 Some of the less-frequently used features of L<DBIx::Class> have external
1006 module dependencies on their own. In order not to burden the average user
1007 with modules they will never use, these optional dependencies are not included
1008 in the base Makefile.PL. Instead an exception with a descriptive message is
1009 thrown when a specific feature can't find one or several modules required for
1010 its operation. This module is the central holding place for the current list
1011 of such dependencies, for DBIx::Class core authors, and DBIx::Class extension
1014 Dependencies are organized in L<groups|/CURRENT REQUIREMENT GROUPS> where each
1015 group can list one or more required modules, with an optional minimum version
1016 (or 0 for any version). In addition groups prefixed with C<test_> can specify
1017 a set of environment variables, some (or all) of which are marked as required
1018 for the group to be considered by L</req_list_for>
1020 Each group name (or a combination thereof) can be used in the
1021 L<public methods|/METHODS> as described below.
1026 #@@ REQUIREMENT GROUPLIST HEADING
1028 push @chunks, '=head1 CURRENT REQUIREMENT GROUPS';
1030 for my $group (sort keys %$dbic_reqs) {
1031 my $p = $dbic_reqs->{$group}{pod}
1034 my $modlist = $dbic_reqs->{$group}{req}
1037 next unless keys %$modlist;
1040 "=head2 $p->{title}",
1043 ( map { "=item * $_" . ($modlist->{$_} ? " >= $modlist->{$_}" : '') } (sort keys %$modlist) ),
1045 "Requirement group: B<$group>",
1051 #@@ API DOCUMENTATION HEADING
1053 push @chunks, <<'EOC';
1057 =head2 req_group_list
1061 =item Arguments: none
1063 =item Return Value: \%list_of_requirement_groups
1067 This method should be used by DBIx::Class packagers, to get a hashref of all
1068 dependencies B<keyed> by dependency group. Each key (group name), or a combination
1069 thereof (as an arrayref) can be supplied to the methods below.
1070 The B<values> of the returned hash are currently a set of options B<without a
1071 well defined structure>. If you have use for any of the contents - contact the
1072 maintainers, instead of treating this as public (left alone stable) API.
1078 =item Arguments: $group_name | \@group_names
1080 =item Return Value: \%set_of_module_version_pairs
1084 This method should be used by DBIx::Class extension authors, to determine the
1085 version of modules a specific set of features requires for this version of
1086 DBIx::Class (regardless of their availability on the system).
1087 See the L</SYNOPSIS> for a real-world example.
1089 When handling C<test_*> groups this method behaves B<differently> from
1090 L</modreq_list_for> below (and is the only such inconsistency among the
1091 C<req_*> methods). If a particular group declares as requirements some
1092 C<environment variables> and these requirements are not satisfied (the envvars
1093 are unset) - then the C<module requirements> of this group are not included in
1096 =head2 modreq_list_for
1100 =item Arguments: $group_name | \@group_names
1102 =item Return Value: \%set_of_module_version_pairs
1106 Same as L</req_list_for> but does not take into consideration any
1107 C<environment variable requirements> - returns just the list of required
1114 =item Arguments: $group_name | \@group_names
1116 =item Return Value: 1|0
1120 Returns true or false depending on whether all modules/envvars required by
1121 the group(s) are loadable/set on the system.
1123 =head2 req_missing_for
1127 =item Arguments: $group_name | \@group_names
1129 =item Return Value: $error_message_string
1133 Returns a single-line string suitable for inclusion in larger error messages.
1134 This method would normally be used by DBIx::Class core features, to indicate to
1135 the user that they need to install specific modules and/or set specific
1136 environment variables before being able to use a specific feature set.
1138 For example if some of the requirements for C<deploy> are not available,
1139 the returned string could look like:
1142 push @chunks, qq{ "SQL::Translator~>=$sqltver" (see $class documentation for details)};
1144 push @chunks, <<'EOC';
1145 The author is expected to prepend the necessary text to this message before
1146 returning the actual error seen by the user. See also L</modreq_missing_for>
1148 =head2 modreq_missing_for
1152 =item Arguments: $group_name | \@group_names
1154 =item Return Value: $error_message_string
1158 Same as L</req_missing_for> except that the error string is guaranteed to be
1159 either empty, or contain a set of module requirement specifications suitable
1160 for piping to e.g. L<cpanminus|App::cpanminus>. The method explicitly does not
1161 attempt to validate the state of required environment variables (if any).
1163 For instance if some of the requirements for C<deploy> are not available,
1164 the returned string could look like:
1167 push @chunks, qq{ "SQL::Translator~>=$sqltver"};
1169 push @chunks, <<'EOC';
1170 =head2 die_unless_req_ok_for
1174 =item Arguments: $group_name | \@group_names
1178 Checks if L</req_ok_for> passes for the supplied group(s), and
1179 in case of failure throws an exception including the information
1180 from L</req_missing_for>.
1182 =head2 modreq_errorlist_for
1186 =item Arguments: $group_name | \@group_names
1188 =item Return Value: \%set_of_loaderrors_per_module
1192 Returns a hashref containing the actual errors that occurred while attempting
1193 to load each module in the requirement group(s).
1195 =head2 req_errorlist_for
1197 Deprecated method name, equivalent (via proxy) to L</modreq_errorlist_for>.
1204 push @chunks, <<'EOC';
1205 =head1 FURTHER QUESTIONS?
1207 Check the list of L<additional DBIC resources|DBIx::Class/GETTING HELP/SUPPORT>.
1209 =head1 COPYRIGHT AND LICENSE
1211 This module is free software L<copyright|DBIx::Class/COPYRIGHT AND LICENSE>
1212 by the L<DBIx::Class (DBIC) authors|DBIx::Class/AUTHORS>. You can
1213 redistribute it and/or modify it under the same terms as the
1214 L<DBIx::Class library|DBIx::Class/COPYRIGHT AND LICENSE>.
1218 open (my $fh, '>', $podfn) or die;
1219 print $fh join ("\n\n", @chunks) or die;
1220 print $fh "\n" or die;
1222 } or croak( "Unable to write $podfn: " . ( $! || $@ || 'unknown error') );