|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Rostislav Podgorniy 2:4635/83.1 03 Jul 2003 09:30:32
To : …. Љ®ў «м
Subject : разбор строки
--------------------------------------------------------------------------------
03 июля 2003 Е. Коваль писал на тему "разбор строки"
ЕК> Привет всем !
ЕК> Помогите, плизз, с разбором строки
ЕК> 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
по идее так должно фуpыкать
($Community, $Router, $Interface) = $Str =~ /([^@]+)@([^:]+):(.*)/
--
WBR, Rostislav Podgorniy rostislav[ @ ]podgorniy.com icq #709057
... Вчера стоял, а ты пришла сегодня!
--- GoldED+ 1.1.4.7 (WinNT 5.1.2600-Service_Pack_1 i686)
* Origin: MailSMS.net - Service for cellular phones owners (2:4635/83.1)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
