alias parsemsgtags {
if ($regex($1-,/([^=]+=[^; ]*);?/g)) {
var %matches = $v1 , %x = 0
while (%x < %matches) {
inc %x
tokenize 61 $regml(%x)
echo -s $replacex($1,\:,;,\s,$chr(32),\r,$cr,\n,$lf,\\,\) == $replacex($2-,\:,;,\s,$chr(32),\r,$cr,\n,$lf,\\,\)
}
}
}