ALT Linux Community general discussions
 help / color / mirror / Atom feed
* [Comm] Выдрать email
@ 2002-10-01 20:45 Alexander Mayorov
  2002-10-02 10:19 ` Igor Homyakov
  0 siblings, 1 reply; 7+ messages in thread
From: Alexander Mayorov @ 2002-10-01 20:45 UTC (permalink / raw)
  To: community

Приветствую!
Наверняка есть какой нибудь способ из html-файла при помощи скрипта или 
программки на perl выдрать адреса email.
Может кто поможет?
Как всегда, заранее спасибо :)

Александр



^ permalink raw reply	[flat|nested] 7+ messages in thread

* Re: [Comm] Выдрать email
  2002-10-02 13:44   ` Johnny
@ 2002-10-02  5:32     ` Alexander Mayorov
  2002-10-02 19:47       ` Yura Kalinichenko
  2002-10-02 19:55       ` Johnny
  0 siblings, 2 replies; 7+ messages in thread
From: Alexander Mayorov @ 2002-10-02  5:32 UTC (permalink / raw)
  To: community

On Wednesday 02 October 2002 19:44, Johnny wrote:
> > man perlre
>
> Шутить изволите? Это ж повеситься можно все писать.
> HTML::Parser и искать mailto
А никто умный не скажет как это сделать из коммандной строки (что то типа 
awk)?
Слабак я в этом, а времени изучать нет :((
Вот и прошу о вспоможении..

Александр
-- 
Земля - крестьянам, фабрики - рабочим, ацидофильное молоко - ацидофилам.



^ permalink raw reply	[flat|nested] 7+ messages in thread

* Re: [Comm] Выдрать email
  2002-10-01 20:45 [Comm] Выдрать email Alexander Mayorov
@ 2002-10-02 10:19 ` Igor Homyakov
  2002-10-02 13:44   ` Johnny
  0 siblings, 1 reply; 7+ messages in thread
From: Igor Homyakov @ 2002-10-02 10:19 UTC (permalink / raw)
  To: community

On Wed, Oct 02, 2002 at 02:45:58AM +0600, Alexander Mayorov wrote:
> Приветствую!
> Наверняка есть какой нибудь способ из html-файла при помощи скрипта или 
> программки на perl выдрать адреса email.
> Может кто поможет?
> Как всегда, заранее спасибо :)

man perlre

--
Igor Homyakov
<homyakov at altlinux dot ru>
http://counter.li.org/cgi-bin/runscript/display-person.cgi?user=190141


^ permalink raw reply	[flat|nested] 7+ messages in thread

* Re: [Comm] Выдрать email
  2002-10-02 10:19 ` Igor Homyakov
@ 2002-10-02 13:44   ` Johnny
  2002-10-02  5:32     ` Alexander Mayorov
  0 siblings, 1 reply; 7+ messages in thread
From: Johnny @ 2002-10-02 13:44 UTC (permalink / raw)
  To: community, Igor Homyakov

В письме от 2 Октябрь 2002 14:19 Igor Homyakov написал:
> On Wed, Oct 02, 2002 at 02:45:58AM +0600, Alexander Mayorov wrote:
> > Приветствую!
> > Наверняка есть какой нибудь способ из html-файла при помощи скрипта
> > или программки на perl выдрать адреса email.
> > Может кто поможет?
> > Как всегда, заранее спасибо :)
>
> man perlre
Шутить изволите? Это ж повеситься можно все писать.
HTML::Parser и искать mailto

-- 
			Johnny


^ permalink raw reply	[flat|nested] 7+ messages in thread

* Re: [Comm] Выдрать email
  2002-10-02 19:47       ` Yura Kalinichenko
@ 2002-10-02 16:37         ` Alexander Mayorov
  0 siblings, 0 replies; 7+ messages in thread
From: Alexander Mayorov @ 2002-10-02 16:37 UTC (permalink / raw)
  To: community

On Thursday 03 October 2002 01:47, Yura Kalinichenko wrote:
> Возникает вопрос - а зачем вам это надо ? Случаем не для сбора
> базы данных для спама ? Другого применения я что-то не вижу..
Нет.

Александр




^ permalink raw reply	[flat|nested] 7+ messages in thread

* Re: [Comm] Выдрать email
  2002-10-02  5:32     ` Alexander Mayorov
@ 2002-10-02 19:47       ` Yura Kalinichenko
  2002-10-02 16:37         ` Alexander Mayorov
  2002-10-02 19:55       ` Johnny
  1 sibling, 1 reply; 7+ messages in thread
From: Yura Kalinichenko @ 2002-10-02 19:47 UTC (permalink / raw)
  To: community

В Срд, 2 Окт 2002, Alexander Mayorov написал(а):

AM> On Wednesday 02 October 2002 19:44, Johnny wrote:
AM> > > man perlre
AM> >
AM> > Шутить изволите? Это ж повеситься можно все писать.
AM> > HTML::Parser и искать mailto
AM> А никто умный не скажет как это сделать из коммандной строки (что то
AM> типа
AM> awk)?
Возникает вопрос - а зачем вам это надо ? Случаем не для сбора
базы данных для спама ? Другого применения я что-то не вижу...

-- 
Yura Kalinichenko




^ permalink raw reply	[flat|nested] 7+ messages in thread

* Re: [Comm] Выдрать email
  2002-10-02  5:32     ` Alexander Mayorov
  2002-10-02 19:47       ` Yura Kalinichenko
@ 2002-10-02 19:55       ` Johnny
  1 sibling, 0 replies; 7+ messages in thread
From: Johnny @ 2002-10-02 19:55 UTC (permalink / raw)
  To: community

В письме от 2 Октябрь 2002 09:32 Alexander Mayorov написал:
> А никто умный не скажет как это сделать из коммандной строки (что то
> типа awk)?
> Слабак я в этом, а времени изучать нет :((
> Вот и прошу о вспоможении..
#!/usr/bin/perl -w

use strict;
use HTML::LinkExtor;
my $p = HTML::LinkExtor->new( sub {
      my($tag, %links) = @_;
      map {print "$_\n" if /mailto:/} values %links if $tag eq "a";
        });
$p->parse_file("index.html");


-- 
			Johnny


^ permalink raw reply	[flat|nested] 7+ messages in thread

end of thread, other threads:[~2002-10-02 19:55 UTC | newest]

Thread overview: 7+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2002-10-01 20:45 [Comm] Выдрать email Alexander Mayorov
2002-10-02 10:19 ` Igor Homyakov
2002-10-02 13:44   ` Johnny
2002-10-02  5:32     ` Alexander Mayorov
2002-10-02 19:47       ` Yura Kalinichenko
2002-10-02 16:37         ` Alexander Mayorov
2002-10-02 19:55       ` Johnny

ALT Linux Community general discussions

This inbox may be cloned and mirrored by anyone:

	git clone --mirror http://lore.altlinux.org/community/0 community/git/0.git

	# If you have public-inbox 1.1+ installed, you may
	# initialize and index your mirror using the following commands:
	public-inbox-init -V2 community community/ http://lore.altlinux.org/community \
		mandrake-russian@linuxteam.iplabs.ru community@lists.altlinux.org community@lists.altlinux.ru community@lists.altlinux.com
	public-inbox-index community

Example config snippet for mirrors.
Newsgroup available over NNTP:
	nntp://lore.altlinux.org/org.altlinux.lists.community


AGPL code for this site: git clone https://public-inbox.org/public-inbox.git