|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : …. Љ®ў «м 2:5020/400 03 Jul 2003 13:07:15
To : Igor Lavrov
Subject : Re: разбор строки
--------------------------------------------------------------------------------
да, это именно то, что надо, спасибо
"Igor Lavrov" <Igor.Lavrov@p777.f4.n5093.z2.fidonet.org> сообщил/сообщила в
новостях следующее: news:1057214110@p777.f4.n5093.z2.ftn...
> Hello Е.!
>
> > Помогите, плизз, с разбором строки
> > 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
>
> ( $Community, $Router, $Interface ) = $Str =~ /(\S+)\@(\S+?):(\S+)/
>
> Igor
>
--- ifmail v.2.15dev5
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
