forum.opennet.ru - "Perl+Regex" (2)

форумы

помощь

поиск

регистрация

майллист

ВХОД

слежка

"Perl+Regex"

Форумы Программирование под UNIX (Public)
Вариант для распечатки		Архивированная нить - только для чтения! Пред. тема \| След. тема
Изначальное сообщение		[Проследить за развитием треда]

"Perl+Regex"
Сообщение от xeon (??) on 25-Окт-04, 23:00 (MSK)
Подскажите пожалуйста какое регулярное выражение использовать чтобы выделить в отдельную переменную числа из такой строки: " Total bytes: 12345" (перед Total и цифрами табуляция). Пробую что-то типа $chisla = s//s Total .(+\d)$/; - выдаёт ошибку... С regex ни разу не работал, буду очень благодарен за помощь.
	Рекомендовать в FAQ \| Cообщить модератору \| Наверх

Оглавление

Perl+Regex, Brainbug, 14:13 , 26-Окт-04, (1)
Perl+Regex, mthawk, 12:22 , 27-Окт-04, (2)

Индекс форумов | Темы | Пред. тема | След. тема

Сообщения по теме

1. "Perl+Regex"

Сообщение от Brainbug (ok) on 26-Окт-04, 14:13  (MSK)

>Подскажите пожалуйста какое регулярное выражение использовать чтобы выделить в отдельную переменную числа
>из такой строки: " Total bytes: 12345" (перед Total и цифрами
>табуляция).
>Пробую что-то типа $chisla = s/*/s Total *.(+\d)$/; - выдаёт ошибку... С
>regex ни разу не работал, буду очень благодарен за помощь.
Dumaju 4to kak nibud tak mozhno:
#!/usr/local/bin/perl -w
$test=" Total bytes:    12345";
printf("%s\n",$test);
$_=$test;
if (/\t(\D+)\t(\d+)$/){
        $chisla=$2;
}
printf("%s\n",$chisla);
exit 0;

Рекомендовать в FAQ | Cообщить модератору | Наверх

2. "Perl+Regex"

Сообщение от mthawk (ok) on 27-Окт-04, 12:22  (MSK)

>Подскажите пожалуйста какое регулярное выражение использовать чтобы выделить в отдельную переменную числа
>из такой строки: " Total bytes: 12345" (перед Total и цифрами
>табуляция).
>Пробую что-то типа $chisla = s/*/s Total *.(+\d)$/; - выдаёт ошибку... С
>regex ни разу не работал, буду очень благодарен за помощь.
Вот рабочий код.
#!/usr/bin/perl
$test=" Total bytes:    12345";
$test=~/\tTotal bytes:\t(\d+)/;
print "$1\n";

Рекомендовать в FAQ | Cообщить модератору | Наверх

Удалить

Индекс форумов | Темы | Пред. тема | След. тема

Пожалуйста, прежде чем написать сообщение, ознакомьтесь с данными рекомендациями.

Партнёры:

Хостинг:

Закладки на сайте
Проследить за страницей

Created 1996-2024 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру

1. "Perl+Regex"
Сообщение от Brainbug (ok) on 26-Окт-04, 14:13 (MSK)
>Подскажите пожалуйста какое регулярное выражение использовать чтобы выделить в отдельную переменную числа >из такой строки: " Total bytes: 12345" (перед Total и цифрами >табуляция). >Пробую что-то типа $chisla = s//s Total .(+\d)$/; - выдаёт ошибку... С >regex ни разу не работал, буду очень благодарен за помощь. Dumaju 4to kak nibud tak mozhno: #!/usr/local/bin/perl -w $test=" Total bytes: 12345"; printf("%s\n",$test); $_=$test; if (/\t(\D+)\t(\d+)$/){ $chisla=$2; } printf("%s\n",$chisla); exit 0;
	Рекомендовать в FAQ \| Cообщить модератору \| Наверх

2. "Perl+Regex"
Сообщение от mthawk (ok) on 27-Окт-04, 12:22 (MSK)
>Подскажите пожалуйста какое регулярное выражение использовать чтобы выделить в отдельную переменную числа >из такой строки: " Total bytes: 12345" (перед Total и цифрами >табуляция). >Пробую что-то типа $chisla = s//s Total .(+\d)$/; - выдаёт ошибку... С >regex ни разу не работал, буду очень благодарен за помощь. Вот рабочий код. #!/usr/bin/perl $test=" Total bytes: 12345"; $test=~/\tTotal bytes:\t(\d+)/; print "$1\n";
	Рекомендовать в FAQ \| Cообщить модератору \| Наверх