Forum Webscript.Ru

Программирование => Perl => Тема начата: grinder от 26 Июля 2002, 12:27:21

Название: Регулярное выражение?
Отправлено: grinder от 26 Июля 2002, 12:27:21

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

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

Название: Регулярное выражение?
Отправлено: Evgeny от 26 Июля 2002, 13:07:52

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


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