|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : …. Љ®ў «м 2:5020/400 03 Jul 2003 09:36:37
To : All
Subject : разбор строки
--------------------------------------------------------------------------------
Привет всем !
Помогите, плизз, с разбором строки
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
Заранее благодарен за ответы
Е. Коваль
--- ifmail v.2.15dev5
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
