+ error_exit("Cannot have both -m (--message) and -i (--interactive)");
+ }
+
+ if (scalar(grep { $message_type eq $_ } @suppported_message_types) == 0) {
+ error_exit("Unsupported message type '$message_type'");
+ }
+
+ if ($ssl && $tls) {
+ error_exit("Connect securely wether using -e (--ssl) or -t (--tls)");
+ }
+
+ if ($headline) {
+ # --headline withouth --message-type
+ if ($message_type eq 'message') {
+ $message_type = 'headline'
+ }
+ else {
+ error_exit("Options --headline and --message-type are mutually exclusive");
+ }
+ }