$id = $1 if (/msgid=([^:]+):/);

      $id =~ s/(^<|>$)//g;