|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Alexander Reznikov 2:4600/220 23 Feb 2004 12:46:24 To : Pavel Shirshov Subject : regexp -------------------------------------------------------------------------------- Как-то Pavel Shirshov писал к Ivan Frolcov, но я услышал и решил ответить : PS> Есть строка следующего вида PS> sdfsdk;l 12.233.54.12 fdlgj 234.213.42.21 dslkdsfkerop 21.44.22.11 PS> 22.33.211.22 PS> Из этой строки надо выдрать все ip адреса, какой конструкцией это PS> можно сделать в perl? while ($text =~ m/(\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3})/og) Пойдёт? Или проще: @ip = $text =~ m/(\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3})/g; Баюшки !! [ Черёмухин aka Гибкость TEAM ] [ UU9JЁКЛМH ] --- Дедушка GoldED+ 1.1.5-2004.01.21 (Win9x 4.10.2222 i586) * Origin: а не то науськаю злого и специального дядю... (2:4600/220) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/133344039cdaf.html, оценка из 5, голосов 10
|