The regex is nice, Im not very good at them i must admit so avoid them unless i really need one. I just said not the only one since i was sure someone was gonna go you could have used $deltok($deltok($1,2-,93),0,91) or .... or ... or ....

But the regex was very good i assume it seeks the [xxx] of [xxx]) and then takes only digits from the xxx ?