ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Ilia Vinokurov                       2:5020/400     03 Jul 2003  09:53:00
 To : …. Љ®ў «м
 Subject : Re: разбор строки
 -------------------------------------------------------------------------------- 
 

 > Помогите, плизз, с разбором строки
 > 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: Comcor (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    разбор строки   …. Љ®ў «м   03 Jul 2003 09:36:37   Re: разбор строки   Ilia Vinokurov   03 Jul 2003 09:53:00   Re: разбор строки   …. Љ®ў «м   03 Jul 2003 10:13:22   Re: разбор строки   …. Љ®ў «м   03 Jul 2003 10:14:02   разбор строки   Igor Lavrov   03 Jul 2003 10:33:50   Re: разбор строки   …. Љ®ў «м   03 Jul 2003 13:07:15   Re: разбор строки   Ilia Vinokurov   03 Jul 2003 11:06:35   разбор строки   Rostislav Podgorniy   03 Jul 2003 09:30:32