di mailer saya kok ngga karuan ya keliatannya? saya
rapiin dikit ya (IP diilangin):
#!/usr/bin/perl
undef $/ ;
( $f = <DATA> ) =~ s/\n+/ /sg;
@daftar = ($f =~ /([a-z]+(?:\.[a-z]+)+):[\s\n]+/g );
%daftar = map {
$daftar[$_],
substr($f, $start=index($f, $s="$daftar[$_]:")+length($s),
( $_ < @daftar ? index($f, "$daftar[$_+1]:") : length($f) )
-$start
)
} (0..@daftar-1) ;
for( sort keys %daftar ){
( $daftar{$_} ) =~ s/\d+(\.\d+)+(:\d+)?// ;
( $daftar{$_} ) =~ s/^\s+// ;
( $daftar{$_} ) =~ s/\s+$// ;
( $daftar{$_} ) =~ s/\s\s+/\s/ ;
print sprintf( "%-22s %s\n", $_, substr($daftar{$_},0,45) )
}
__DATA__
www.net.id: 202.159.34.252:80 * Solaris 2.x www.sat.net.id:
203.130.232.17:80 * Windoze 95/98/NT www.melsa.net.id:
202.138.224.254:80 * FreeBSD, NetBSD, OpenBSD www.datamation.net.id:
error: unknown host www.datamation.net.id www.sisfotel.net.id:
...
...
---------------------------------------------------------------------
intim.net.id * Dead Host, Firewalled Port or Unassigned IP
www.access.net.id *- Firewalled host/port or network congestion
www.ap.net.id error: unknown host www.ap.net.id
www.apic.net.id * FreeBSD, NetBSD, OpenBSD
www.asia.net.id * Windoze 95/98/NT
www.bit.net.id * SCO/Unix or SCO/Openserver
www.bumi.net.id *- Unknown OS, pleez update /usr/local/etc/qu
www.cabi.net.id * Linux 1.3.xx, 2.0.0 to 2.0.34
www.cbn.net.id
www.centrin.net.id * BSDi or IRIX
www.cline.net.id * Solaris 2.x
www.commerce.net.id * Solaris 2.x
www.datamation.net.id error: unknown host www.datamation.net.id
www.dnet.net.id * Standard: Solaris 2.x, Linux 2.1.???, MacOS
www.elga.net.id * Cisco 11.2(10a), HP/3000 DTC, BayStack Swit
www.gapura.net.id error: unknown host www.gapura.net.id
www.global.net.id error: unknown host www.global.net.id
www.globalcomm.net.id * Windoze 95/98/NT
www.ibm.net.id * IBM AIX 4
www.idnic.net.id * Solaris 2.x
www.idola.net.id * Berkeley: usually Digital Unix, OSF/1 V3.0,
www.iix.net.id error: unknown host www.iix.net.id
www.indo.net.id * Linux 1.3.xx, 2.0.0 to 2.0.34
www.indosat.net.id *- Firewalled host/port or network congestion
www.indosoft.net.id * Dead Host, Firewalled Port or Unassigned IP
www.infoasia.net.id * Solaris 2.x
www.insprint.net.id * Solaris 2.x
www.inter.net.id * Linux 1.3.xx, 2.0.0 to 2.0.34
www.iptek.net.id * FreeBSD, NetBSD, OpenBSD
www.jasnita.net.id * Cisco 11.2(10a), HP/3000 DTC, BayStack Swit
www.kadin.net.id * Standard: Solaris 2.x, Linux 2.1.???, MacOS
www.koi.net.id error: unknown host www.koi.net.id
www.link.net.id *- Unknown OS, pleez update /usr/local/etc/qu
www.media.net.id error: unknown host www.media.net.id
www.mega.net.id * Windoze 95/98/NT
www.melsa.net.id * FreeBSD, NetBSD, OpenBSD
www.metra.net.id error: unknown host www.metra.net.id
www.mitra.net.id * Berkeley: usually Digital Unix, OSF/1 V3.0,
www.multimedia.net.id *- Unknown OS, pleez update /usr/local/etc/qu
www.net.id * Solaris 2.x
www.netura.net.id * Solaris 2.x
www.pacific.net.id * Solaris 2.x
www.prima.net.id * Solaris 2.x
www.sat.net.id * Windoze 95/98/NT
www.sig.net.id * Solaris 2.x
www.sisfotel.net.id * Dead Host, Firewalled Port or Unassigned IP
www.sistelindo.net.id * IBM AIX 4
www.spot.net.id * Windoze 95/98/NT
www.star.net.id error: unknown host www.star.net.id
www.telkom.net.id * Standard: Solaris 2.x, Linux 2.1.???, MacOS
www.ub.net.id * Linux 1.3.xx, 2.0.0 to 2.0.34
www.uninet.net.id * Solaris 2.x
www.vision.net.id *- Unknown OS, pleez update /usr/local/etc/qu
www.wasantara.net.id *- Firewalled host/port or network congestion
www.wireless.net.id *- Not Listen, try another port
** Jadual puasa Ramadhan @ http://www.indoglobal.com/puasa.html **
Layanan Informasi Iklan Baris Internet * http://www.iklan-25.co.id
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
To unsubscribe, e-mail : [EMAIL PROTECTED]
To subscribe, e-mail : [EMAIL PROTECTED]
Netika BerInternet : [EMAIL PROTECTED]
HI-Reliability low cost web hosting service - http://www.IndoGlobal.com