| Current Path : /usr/share/perl5/vendor_perl/GnuPG/ |
| Current File : //usr/share/perl5/vendor_perl/GnuPG/HashInit.pm |
package GnuPG::HashInit;
use Moo::Role;
sub hash_init {
my ($self, %args) = @_;
while ( my ( $method, $value ) = each %args ) {
$self->$method($value);
}
}
1;
__END__