Evaluated proc ungape_html str { regexp -all -inline {&(\d){1,4};} $str }