14 |
|
|
15 |
=head1 VERSION |
=head1 VERSION |
16 |
|
|
17 |
Version 0.01 |
Version 0.02 |
18 |
|
|
19 |
=cut |
=cut |
20 |
|
|
21 |
our $VERSION = '0.01'; |
our $VERSION = '0.02'; |
22 |
|
|
23 |
=head1 SYNOPSIS |
=head1 SYNOPSIS |
24 |
|
|
136 |
=head2 iterate_inputs |
=head2 iterate_inputs |
137 |
|
|
138 |
$config->iterate_inputs( sub { |
$config->iterate_inputs( sub { |
139 |
my $input = shift; |
my ($input, $database, $database_config_hash) = @_; |
140 |
# ... do something with input config hash |
# ... do something with input config hash |
141 |
} ); |
} ); |
142 |
|
|
162 |
|
|
163 |
foreach my $input (@inputs) { |
foreach my $input (@inputs) { |
164 |
$log->debug("iterating over input ", dump($input)); |
$log->debug("iterating over input ", dump($input)); |
165 |
$code_ref->($input); |
$code_ref->($input, $database, $db_config); |
166 |
} |
} |
167 |
} |
} |
168 |
|
|