de que descriptor de archivo está hablando ?
porque hacés el my $err = $Mail::Sender::Error; si luego no lo usas...limpia un poco tu código...
talvés eso hace que no pueda manejar bien los errores...pensá que cuanto más código más probabilidad de error...