diff options
-rwxr-xr-x | masterkey.pl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/masterkey.pl b/masterkey.pl index 72ede20..e82b350 100755 --- a/masterkey.pl +++ b/masterkey.pl @@ -144,12 +144,14 @@ fun gpg_get_users($key) { my $user = Encode::decode('utf8', $uid->as_string); unless ($user =~ m/^(?<name>.*?) (?:\((?<comment>.*?)\) )?\<(?<email>.*?@.*?)\>$/) { - die "Failed to parse GPG user information for key $key; got $user"; + warn "Warning: Failed to parse GPG user information for key $key; got '$user'. Ignoring...\n"; } push @users, {%+}; } + die "Failed to parse even one UID from key. Giving up" unless (0+@users > 0); + return \@users; } |