Регулярное выражение?

[grinder]

В файл пишуться данные таким образом:
*1*
*2*
*3*
*4*
.
.
.
*1000*
.
.

Как мне вытащить из этого последнее число?

[Evgeny]

Код: [Выделить]


while()
{  $lastnum=$1 if /^\\*(\\d+)\\*/;
}