-------- Original Message --------
Subject: failure notice
Date: 26 Apr 2002 10:23:53 -0000
From: [EMAIL PROTECTED]
To: [EMAIL PROTECTED]

Hi. This is the qmail-send program at server2.client.org.
I'm afraid I wasn't able to deliver your message to the following addresses.
This is a permanent error; I've given up. Sorry it didn't work out.

<[EMAIL PROTECTED]>:
ezmlm-reject: fatal: Sorry, I don't accept messages of MIME Content-Type 
'multipart/mixed'
(#5.2.3)

--- Below this line is a copy of the message.

Return-Path: <[EMAIL PROTECTED]>
Received: (qmail 18140 invoked from network); 26 Apr 2002 10:23:51 -0000
Received: from unknown (HELO mail.satunet.com) (202.53.253.185)
  by linux.or.id with SMTP; 26 Apr 2002 10:23:51 -0000
Received: from poskanzer.org (unknown [202.53.238.135])
        by mail.satunet.com (Postfix) with ESMTP id AADE27F2F
        for <[EMAIL PROTECTED]>; Fri, 26 Apr 2002 17:19:04 +0700 (JAVT)
        (envelope-from [EMAIL PROTECTED])
Sender: [EMAIL PROTECTED]
Message-ID: <[EMAIL PROTECTED]>
Date: Fri, 26 Apr 2002 17:20:37 +0700
From: Edwin Pratomo <[EMAIL PROTECTED]>
X-Mailer: Mozilla 4.77 [en] (X11; U; Linux 2.4.3-20mdk i686)
X-Accept-Language: en
MIME-Version: 1.0
To: [EMAIL PROTECTED]
Subject: [Fwd: failure notice] Re: [programming] OpenUSS 1.2 Final is out!
Content-Type: multipart/mixed;
 boundary="------------96723D118466D9F993403961"

This is a multi-part message in MIME format.
--------------96723D118466D9F993403961
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit


[EMAIL PROTECTED] wrote:
> 
> Hi. This is the qmail-send program at server2.client.org.
> I'm afraid I wasn't able to deliver your message to the following addresses.
> This is a permanent error; I've given up. Sorry it didn't work out.
> 
> <[EMAIL PROTECTED]>:
> ezmlm-reject: fatal: Sorry, I don't accept messages of MIME Content-Type 
>'multipart/mixed' (#5.2.3)
> 
> 
> mige harimurti wrote:
> >
> > Hmm ...
> > Dua hal yang saya pengen tahu .....
> >
> > Satu ....
> > Siapa saja teman2 yang udah pernah bikin/bantuin Free Software project
> > itu, khususnya yang dipublikasikan (e.g. di Freshmeat, SourceForge,
> > Savannah) ?
> > Ngaku aja deh ....
> 
> coba dicari saja di SF pake skrip ini. nama2 yg saya masukin di situ saya ambilin 
>dari yg
> ikut milis ini, saya pilihin yg bau2 indonesia dan tidak terlalu pendek.
> 
> bisa ditambahin sendiri nama2 lokal misalkan pailul, koming, dsb. Asal jangan
> terlalu pendek, hasilnya ngaco (false positive).
> 
> Ini memang cuma dapet username aja, silakan dikembangkan sendiri supaya bisa dapet
> project-nya. trus di-sort berdasarkan activity project, bla bla bla.. dlsb.
> 
> rgds,
> Edwin.
--------------96723D118466D9F993403961
Content-Type: text/plain; charset=us-ascii;
 name="cari-sf"
Content-Transfer-Encoding: 7bit
Content-Disposition: inline;
 filename="cari-sf"

#!/usr/bin/perl -w

{
    package P;
    require HTML::Parser;
    use vars qw(@ISA $OUT);

    @ISA=qw(HTML::Parser);

    sub new
    {
        my $class = shift;
        my $self = $class->SUPER::new;
        $OUT = '';
        $self;
    }

    sub DESTROY
    {
        my $self = shift;
        eval { $self->SUPER::DESTROY; };
    }

    sub start
    {
        my($self, $tag, $attr) = @_;
        return if $self->{finish};
        if ($tag eq 'h3') {
            $self->{h3} = 1;
            #print STDERR "h3 opened\n";
        }
    }

    sub end
    {
        my($self, $tag) = @_;
        return if $self->{finish};
        if ($tag eq 'h3') {
            $self->{h3} = 0;
            #print STDERR "h3 closed\n";
        }

        if ($self->{fetch_result}) {
            $self->{finish} = 1, return if $tag eq 'table';
        } 
    }

    sub text
    {
        my ($self, $text) = @_;
        return if $self->{finish};
        if ($self->{h3}) {
            $self->{fetch_result} = 1, return if $text =~ /Search results for/;
        }
        if ($self->{fetch_result}) {
            $text =~ s/^\s*$//gm; return unless $text;
            $text =~ s/[\r\n]//gs;

            # print STDERR "'$text'\n";
            $OUT .= "$text\n";
        } 
    }
}

package main;

$|++;

use HTTP::Request::Common qw(POST);
use LWP::UserAgent;

my $ua = LWP::UserAgent->new;

while (<DATA>) {
    chomp;
    print STDERR "Searching $_ ..\n";
    my $req = POST 'http://sourceforge.net/search/',
        [ type_of_search => 'people', exact => 1, words => $_, Search => 'Search' ];

    my $p = new P;
    my $res = $ua->request($req);
    die $res->as_string unless $res->is_success;

    $p->parse($res->as_string);
    $p->eof;

    print $P::OUT;
}

__END__
Abraham Mario Tapilouw
Abu Hudzaefah
Achmad Mardiansyah
Achmad Syafii
Ady Wicaksono
Agus Budy Wuysang
Agus Triyanto
Ahmad-Masykur
Ai Mulyana
Amlan S Warman
Andrew Adhi Ariane
Andri Grananda
Andri Herumurti
Andry Susanto
AriSri
Ariee
Ario
Aris G Tirtaraya
Aris G pdc.co.id
Arius Subchi
Arman
As'ad
Atjous Ovrecker
Ayen Yang
B N Prastowo
Bambang "Purnomosidi D. P."
Bambang Ajriman
Bambang Hariyanto
Bambang Nurcahyo Prastowo
Bambang Prastowo
Bambang Purnomosidi
Bambang Purnomosidi D. P.
Bayu Laksono
Benny Prijono
Bonny Hardi Putra
Chimera
Danar Prabandaru
Daniel K
Danny Setiawan
Danu Wardono
David Yulianto Santoso
Dedekovic
Denie Nataprawira
Dimas  Adityo
Dion Diablo
Domu Sirait
Donald Alexander Latumahina
Efata
Effendy Kho
Eko Bono
Erga Munggaran
FabianJM
Fernandus
Firman Khairul
GUNTORO Asto
Hadi Ariwibowo
Hadi Purnawan Satria
Hadipurnawan Satria
Haminullah
Hananto L. Wibowo
Hannibal_Linux
Haris Fauzi
Hengky Stevanus
Henky Purnawan
Ikhlasul Amal
Iman S. H. Suyoto
Indra Gunawan
Indra Putera
Indra Riawan
Indra Wahyudi
Irawan M A Saleh
Ivonny lovrina
Iwan Garnadi
Iwan-S
Jasiph A.P
Jhen Hen Ryco
Johan Huang
KIRUL SS
Keitarou Arashiyama
Kenshi Himura
Kisanak
Laksono
Luqman Hakim
Luqman-Hakim
Luser
M. Yadi Mulyadi
Marvel Subiantoro
Masykur
Mige Harimurti
Milis Uzan
Mohamad Ilhami
Muhammad Ridwan
N Kurniawan
N. Kurniawan
Panca Arya Bagus
Paulus Allo
Prianggada I Tanaya
Prianggada I Tanaya (E)
Priyadi Iman Nurcahyo
Purnomo
Purwadi
Putra
R-van
Rachman M.H
Rama
Ramhot95
Razmal Djamal
Razmal-Djamal
Rhodex
Rianu
Riki Hendriana
Rizal Aeska Zibro
Rizal Cut Adek
Romie Djapri
Ronny Haryanto
Ronux Sadrux
Sahrial-Rasad
Salma Haryanto
Samuel Prakoso
Sandi Wijaya
Sasongko
Slamet Puji Santuso
Steven Haryanto
Stikirana Yuana
Suwanto Afiadi
Tatang Widyanto
Teddy
Togu Raja
Tommy Wibowo
Utari Wijayanti
Visia
Wahyudi Firdaus
Wardi
Wiryana
Yohanes Nugroho
Yusi Ibnu Malik
Yusron Hilmy
abdullah syakur
adi wirasta
adi-chandra
adwin
agung setiawan
agus gustiana
agus wahyu
akuwww
ardiansyah ht
arief muLya
arief_mulya
arif kecil
azis
baron
ben djaya
bhakti
blankz
budi pranawinoto
bulls
chandra pawitra
codemax
commedo
cun_mt
daniel suherman
dede
denny
dheche
dik N.
doddi priyambodo
dody suria wijaya
dry ae
el-anastasia
enjen
fade2blac
hariansyah darsumo
hendrik
henri arianto
henrry
idban secandri
idiagung
ipoel-fajar
jerry_peter_saerang
johannes
kurniadi
landz of change
marpaung
mdamt
mige harimurti
rachman
reyza
risiyanto
rofiq
ruri muharto
same yo
scannewbie
soeharwinto
wahwan
wisnu pitara
xybertooth
yoga Syahid

--------------96723D118466D9F993403961--

-- 
Utk berhenti langganan, kirim email ke [EMAIL PROTECTED]
Informasi arsip di http://www.linux.or.id/milis.php3

Kirim email ke