|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : …. Љ®ў «м 2:5020/400 03 Jul 2003 10:14:02
To : Ilia Vinokurov
Subject : Re: разбор строки
--------------------------------------------------------------------------------
Разобрался, помогло, спасибо
"Ilia Vinokurov" <ilvin@teleserv.ru> сообщил/сообщила в новостях следующее:
news:be0g5b$5to$1@dns.comcor.ru...
> > Помогите, плизз, с разбором строки
> > COMMUNITY@ROUTER:Serial3/0:0
> > Hужно выделить отсюда COMMUNITY, ROUTER, Serial3/0:0
> > Портят все символы ":" - шаблон типа:
> > ( $Community, $Router, $Interface ) = $Str =~ /(\S+)\@(\S+):(\S+)/
> > Дает такое:
> > Community=COMMUNITY
> > Router = router1:Serial3/0
> > Interface=0
> > А нужно, чтобы после 1-го : все остальное считалось в Interface
>
> Может поможет. Hе тестировал.
>
> $Str =~ /([^\@]*)\@([^:]*):([^:]*):(.*)/o
>
>
--- ifmail v.2.15dev5
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
Re: разбор строки 