1
1
package Config::MVP::Reader::Hash;
2
2
# ABSTRACT: a reader that tries to cope with a plain old hashref
3
$Config::MVP::Reader::Hash::VERSION = '2.200007';
3
$Config::MVP::Reader::Hash::VERSION = '2.200008';
5
5
extends 'Config::MVP::Reader';
9
# my $sequence = Config::MVP::Reader::Hash->new->read_config( \%config );
13
# In some ways, this is the L<Config::MVP::Reader> of last resort. Given a
14
# hashref, it attempts to interpret it as a Config::MVP::Sequence. Because
15
# hashes are generally unordered, order can't be relied upon unless the hash tied
16
# to have order (presumably with L<Tie::IxHash>). The hash keys are assumed to
17
# be section names and will be used as the section package moniker unless a
18
# L<__package> entry is found.
9
#pod my $sequence = Config::MVP::Reader::Hash->new->read_config( \%config );
11
#pod =head1 DESCRIPTION
13
#pod In some ways, this is the L<Config::MVP::Reader> of last resort. Given a
14
#pod hashref, it attempts to interpret it as a Config::MVP::Sequence. Because
15
#pod hashes are generally unordered, order can't be relied upon unless the hash tied
16
#pod to have order (presumably with L<Tie::IxHash>). The hash keys are assumed to
17
#pod be section names and will be used as the section package moniker unless a
18
#pod L<__package> entry is found.
22
22
sub read_into_assembler {
23
23
my ($self, $location, $assembler) = @_;