Select Code to Download

$msg = MIME::Lite->new(
                 From     =>'me@myhost.com',
...
    $msg =~ s/To: (.*)/To: $recipient/;
    $msg->send;
}

    
my $cc = join ', ', @recipients;
$msg = MIME::Lite->new(
...
         );

$msg->send;