sub option_fields_hashref {
my $self = shift;
tie my %hash, 'Tie::IxHash', $self->option_fields;
+ \%hash;
}
=item option_fields_listref
sub option_fields_listref {
my $self = shift;
my $hashref = $self->option_fields_hashref;
+ warn $hashref;
[ keys %$hashref ];
}