Evaluated proc cblock2map c {regexp -inline {^([0-9][0-5]*)(,([0-9][0-5]*))*(.+?)$} $c}