eval{
		my $mailer = new Mail::Mailer 'smtp', Server => $SERVER;
		
		# Send our options
		$mailer->open({
			From	=>	$SENDERALIAS . '<' . $SENDEREMAIL . '>',
			To		=>	$TO . '<' . $EMAIL . '>',
			Subject	=>	$SUBJECT
		});
		
		print $mailer $message;
	};
	
	if($@)
	{
		# Oops!
		print "$@\n";
	}