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