Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / (PERL) модификаторы комманды m / 6 сообщений из 6, страница 1 из 1
14.10.2005, 09:11
    #33324086
Alex2005
Alex2005
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(PERL) модификаторы комманды m
Привет народ, всем вопрос:
вот кусочек кода:

my $t = '123
456_789';

$s = $1 if $t =~ /(.*?)_/m;

print "s = $s\n";

запоминает в переменную только то что с новой строки и
выводит "456" а хочется чтобы выводил
s = 123
456

как заставить его это сделать?
Всем кто ответит большое спасибо заранее ;-))
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.10.2005, 09:26
    #33324104
Alex2005
Alex2005
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(PERL) модификаторы комманды m
Спасибо сам допер.

$s = $1 if $t =~ /(.*?)_/ms;

Извините за беспокойство ;-))
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.10.2005, 09:45
    #33324139
g613
g613
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(PERL) модификаторы комманды m
Alex2005Спасибо сам допер.

$s = $1 if $t =~ /(.*?)_/ms;

Извините за беспокойство ;-))

ты уж определись хочеш ли ты 'm'-ulti string, или 's'-ingle string. А то как то не логично пользовать оба одновременно...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.10.2005, 12:33
    #33324760
автор423
автор423
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(PERL) модификаторы комманды m
g613 Alex2005Спасибо сам допер.

$s = $1 if $t =~ /(.*?)_/ms;

Извините за беспокойство ;-))

ты уж определись хочеш ли ты 'm'-ulti string, или 's'-ingle string. А то как то не логично пользовать оба одновременно...

Бред. s насколько я помню это модификатор DOT ALL, то бишь точка в добавок ко всему воспринимает переносы строки и другие мелочи.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.10.2005, 12:43
    #33324809
g613
g613
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(PERL) модификаторы комманды m
автор423 g613 Alex2005Спасибо сам допер.

$s = $1 if $t =~ /(.*?)_/ms;

Извините за беспокойство ;-))

ты уж определись хочеш ли ты 'm'-ulti string, или 's'-ingle string. А то как то не логично пользовать оба одновременно...

Бред. s насколько я помню это модификатор DOT ALL, то бишь точка в добавок ко всему воспринимает переносы строки и другие мелочи.

...в результяте чего весь текст в $s рассматривается как одна строка...

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
perldoc perlre

       ...
       m   Treat string as multiple lines.  That is, change "^" and "$" from matching the start or end of the string to matching the start or end of
           any line anywhere within the string.

       s   Treat string as single line.  That is, change "." to match any character whatsoever, even a newline, which normally it would not match.

      ...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.10.2005, 12:47
    #33324822
автор423
автор423
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(PERL) модификаторы комманды m
g613
...в результяте чего весь текст в $s рассматривается как одна строка...


Ок уболтал :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / (PERL) модификаторы комманды m / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 397ms
Закрыть
start [/forum/topic.php?fid=23&tablet=1&tid=1477429]:
 0ms
get settings:
 9ms
get forum list:
 21ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 41ms
get topic data:
 12ms
get forum data:
 2ms
get page messages:
 57ms
get tp. blocked users:
 1ms
others: 248ms
total:  397ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]