- $email = '<' . $email . '>' if defined $email;
- my $desc = join ', ', grep defined, $opts{author}, $email, $opts{url};
- $desc = ' (' . $desc . ')' if length $desc;
- $opts{banner} = $opts{desc} . $desc;
+ $email = "<$email>" if defined $email;
+
+ my $who = join ', ', grep defined, $opts{author}, $email, $opts{url};
+ $who = " ($who)" if length $who;
+ $opts{banner} = $opts{desc} . $who;