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