$address='one@example.com, two@example.com';

my $msg = MIME::Lite-> new(
	From     => 'sender@example.com',
	To       => "$address",
	Cc	  => 'three@example.com',
	Subject  => 'Subject',
	Type	  => 'text/plain',
	Data     => 'Body text here'
	);

$msg-> send('smtp', "mysmtp.server.com", Timeout=>60);