|
Поиск в файле
|
|||
---|---|---|---|
#18+
Добрай день... Пробл такой... Может и тревиально, но я сталкиваюсь впервые... Как организовать поиск внутри одного тестового файла? Поиск по заданому слову. Де еще чтобы потом выводить тервыей три слова строки 8( ... |
|||
:
Нравится:
Не нравится:
|
|||
20.01.2004, 14:30 |
|
Поиск в файле
|
|||
---|---|---|---|
#18+
Я бы сделал так: Код: plaintext 1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 11.
... |
|||
:
Нравится:
Не нравится:
|
|||
20.01.2004, 14:49 |
|
Поиск в файле
|
|||
---|---|---|---|
#18+
а я бы сделал так: #!/usr/bin/perl $srch = 'slovo'; $fname = 'file.txt'; open( FIL, $fname ); $_ = join( "", <FIL> ); close( FIL ); m/^(.*?$srch.*?)$/im; $_ = $&; m/^(\w+\W+\w+\W+\w+\W+)/; $_ = $&; print $_; ... |
|||
:
Нравится:
Не нравится:
|
|||
03.02.2004, 20:25 |
|
Поиск в файле
|
|||
---|---|---|---|
#18+
хехехе..тогда уж Код: plaintext 1.
... |
|||
:
Нравится:
Не нравится:
|
|||
04.02.2004, 00:57 |
|
|
start [/forum/topic.php?fid=23&msg=32381730&tid=1480110]: |
0ms |
get settings: |
10ms |
get forum list: |
14ms |
check forum access: |
5ms |
check topic access: |
5ms |
track hit: |
175ms |
get topic data: |
12ms |
get forum data: |
2ms |
get page messages: |
38ms |
get tp. blocked users: |
1ms |
others: | 12ms |
total: | 274ms |
0 / 0 |