поиск значений в строке

vision 09.12.2005 13:10

Например есть трока:

$stri[1as,23,4t5,678,91]

Мне нужно найти и определить кол-во цифр 1 в этой строке.

Я думал что мне поможет это:
$tb[^stri.match[1][g]]
^tb.save[tb.txt]

Но выдаётся пустая таблица:

prematch match postmatch 1 2 3 4 5....100

Подскажите как подобные вещи можно осуществить.

---