my $typekey = Authen::TypeKey->new;
- for (qw/expires key_cache key_url token version/) {
- $typekey->$_( $config->{$_} || next );
+ for (grep { exists $config->{$_} } qw/expires key_cache key_url token version/) {
+ $typekey->$_( $config->{$_} );
}
$typekey;