I’m trying to extract specific word in TCL using regex that have below criteria

1. Begin with letter “K”
2. Second letter is either A or H or N or Z or R
3. followed by letters
4. followed by dash “-“
5. followed by letters
6. ending with 2 numbers

set title "reserved for KNBCDEF-ABCD01"
set greptitle [regexp -all -inline {mK[AHNZR][A-Za-z]*-[0-9]{2}M} $title]
send_user "Matched patterns: greptitlen"

trying above code but gave empty output.

Extracted word from string(s) might be in any below format as long as it matched above criteria
KNBCDEF-ABCD01 or KAXXG-YYUU54 or KRBEF-ZZ654 etc.