if (defined $bcc and @$bcc) {
    # definiert und nicht leer
    $bcc_string = 'Bcc: ' . (join ',', @$bcc) . $/;
}
elsif (defined $bcc) {
    # definiert, aber leer
    $bcc_string = '';
}
else {
    # gar nicht definiert
    $bcc_string = 'Bcc: default@example.org' . $/;
}