|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : vilfred 2:5020/400 29 Aug 2001 17:07:05
To : Vilfred
Subject : Re: гы, право с лево перепутал :)
--------------------------------------------------------------------------------
(\w+) (\w+) \s \2(\w+)
1: 'network'''=> '\s' совпадает ли с '\sworkshop' falure
2: 'networ''k'=> '\sk' совпадает ли с '\sworkshop' falure
3: 'netwo''rk'=> '\srk' совпадает ли с '\sworkshop' falure
4: 'netw''ork'=> '\sork' совпадает ли с '\sworkshop' falure
5: 'net''work'=> '\swork' совпадает ли с '\sworkshop' ok
для первой строки все проходит потому, что есть такая прога:
#!/usr/bin/perl
$uu="asdfghjk kuku";
$uu=m~/(\w+)(\w+)(\w+)/
print "$1 $2 $3###$4 $5\n";
и она печатает
asdfgh j k###kuk u
т.е. первая строчка просто нереализуема в принципе. А это значит, что
дебаг верный:
1: 'networ''k'=> '\sk' совпадает ли с '\sworkshop' falure
2: 'netwo''rk'=> '\srk' совпадает ли с '\sworkshop' falure
3: 'netw''ork'=> '\sork' совпадает ли с '\sworkshop' falure
4: 'net''work'=> '\swork' совпадает ли с '\sworkshop' ok
Thx, спасибо что разрулили!
[TEAM Маньяки Маньяки Маньяки]
--
Отправлено через сервер Talk.Ru - http://www.talk.ru
--- ifmail v.2.15dev5
* Origin: Talk.ru (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
