Просмотр сообщений

В этом разделе можно просмотреть все сообщения, сделанные этим пользователем.


Сообщения - AlekseyD

Страницы: [1]
1
Perl / RegExp в Perl
« : 21 Мая 2006, 15:38:34 »
Цитировать
Zerokool:
P.S. Судя по всему вы только с Питона?


Нет я с Perl. Посто я очень люблю когда все красиво и в одной строке. (хотя бывает конечно перумудрю. :) ) А вообще все зависит от конкретной задачи. Я для себя поставил задачу что бы был как можно более компактный код. Со скоростью да я понимаю что так будет на много медленей работать. Но такой задачи я себе не ставил.

2
Perl / RegExp в Perl
« : 08 Мая 2006, 11:35:25 »
Цитировать
NeoNox:
AlekseyD, мне кажется, Вы сами себе ставите задачу.
Страница для распарсивания не Ваша?


Да не моя. А это как то меняет дело?

3
Perl / RegExp в Perl
« : 06 Мая 2006, 18:33:02 »
Цитировать
09h:
здается мне что эти 2 строки выполняют поиск с заменой... поправь если ошибся.

Да ты ошибаешься. Тут нет не какого поиска с заменой есть просто поиск. Где там стоит ...=~s///?
В твоем примере я бы сделал так (просто очень уж больно навороченная конструкция):
#!/usr/bin/perl -wT

$log = "./tt.txt";

open (LOG, "<$log") || Error(\'open\', \'file\');
my @data = ;
close (LOG);

my $data = join(\'\',@data);
my $aa = ($data=~/
([^<]+)
/g);
$aa = ($aa=~/([^<]+)/g);

Согласись намного короче и намного понетней?

4
Perl / RegExp в Perl
« : 06 Мая 2006, 16:08:47 »
Ребят зачем такие извращения?
Можно сделать так
....
$aa = ($html=~/
([^<]+)
/g);
$aa = ($aa=~/([^<]+)/g);
и получаем ссылку на нужный массив. Но просто хотелось бы в одну строку это все втулить. :)

5
Perl / RegExp в Perl
« : 06 Мая 2006, 12:48:30 »
Здравствуйте!
Есть код html например


......


Нужно получить список слов заключенных в теги . Т.е. text1,text2....
Я это делаю так
@arr = ($html=~/([^<]+)/g);

Все нормально работает. Но вот вопрос как мне получить только список слов из тега
одним регэкспом?
Я вообще использую библиотеку RegExp::Bind там все делаеться чуть проще.

@aa = RegExp::Bind->global_bind($html, qr/(?#[^<]+)/);

Т.е. в @aa я получу массив ссылок на хеши. @aa = ({teg_a=>text1},{teg_a=>text2}....)

Подскажите пожалуйста как мне получить только список слов из тега
...
одним регэкспом с помощью библиотеки RegExp::Bind или подобных ей.

Спасибо.

Страницы: [1]