use Net::Whois::RIPE; $server = "whois.ripe.net"; $as = "LEASEWEB"; $whois = Net::Whois::RIPE->new($server); $query = $whois->query($as); $output = $query->content; @lijn = split(/\n/,$output); foreach $line (@lijn) { @lines = split(/:/, $line); next unless ($lines[0] =~ /inetnum/); $lines[1] =~ s/^\s+|\s+$//g; print $lines[1]."\n"; } exit; #### % This is the RIPE Whois query server #1. % The objects are in RPSL format. % % Rights restricted by copyright. % See http://www.ripe.net/db/copyright.html % Note: This output has been filtered. % To receive output for a database update, use the "-B" flag. % Information related to '62.212.64.0 - 62.212.64.255' inetnum: 62.212.64.0 - 62.212.64.255 netname: LEASEWEB descr: LeaseWeb descr: P.O. Box 93054 descr: 1090BB AMSTERDAM descr: Netherlands descr: www.leaseweb.com remarks: Please send email to "abuse@leaseweb.com" for complaints remarks: regarding portscans, DoS attacks and spam. country: NL admin-c: LSW1-RIPE tech-c: LSW1-RIPE status: ASSIGNED PA mnt-by: OCOM-MNT source: RIPE # Filtered #### % This is the RIPE Whois query server #1. % The objects are in RPSL format. % % Rights restricted by copyright. % See http://www.ripe.net/db/copyright.html % Note: This output has been filtered. % To receive output for a database update, use the "-B" flag. % Information related to '62.212.64.0 - 62.212.64.255' inetnum: 62.212.64.0 - 62.212.64.255 netname: LEASEWEB descr: LeaseWeb descr: P.O. Box 93054 descr: 1090BB AMSTERDAM descr: Netherlands descr: www.leaseweb.com remarks: Please send email to "abuse@leaseweb.com" for complaints remarks: regarding portscans, DoS attacks and spam. country: NL admin-c: LSW1-RIPE tech-c: LSW1-RIPE status: ASSIGNED PA "status:" definitions mnt-by: OCOM-MNT source: RIPE # Filtered person: RIP Mean address: P.O. Box 93054 address: 1090BB AMSTERDAM address: Netherlands phone: +31 20 3162880 fax-no: +31 20 3162890 abuse-mailbox: abuse@leaseweb.com nic-hdl: LSW1-RIPE mnt-by: OCOM-MNT source: RIPE # Filtered % Information related to '62.212.78.0 - 62.212.78.255' inetnum: 62.212.78.0 - 62.212.78.255 netname: LEASEWEB descr: LeaseWeb descr: P.O. Box 93054 descr: 1090BB AMSTERDAM descr: Netherlands descr: www.leaseweb.com remarks: Please send email to "abuse@leaseweb.com" for complaints remarks: regarding portscans, DoS attacks and spam. country: NL admin-c: LSW1-RIPE tech-c: LSW1-RIPE status: ASSIGNED PA "status:" definitions mnt-by: OCOM-MNT source: RIPE # Filtered person: RIP Mean address: P.O. Box 93054 address: 1090BB AMSTERDAM address: Netherlands phone: +31 20 3162880 fax-no: +31 20 3162890 abuse-mailbox: abuse@leaseweb.com nic-hdl: LSW1-RIPE mnt-by: OCOM-MNT source: RIPE # Filtered % Information related to '62.212.68.0 - 62.212.68.255' inetnum: 62.212.68.0 - 62.212.68.255 netname: LEASEWEB descr: LeaseWeb descr: P.O. Box 93054 descr: 1090BB AMSTERDAM descr: Netherlands descr: www.leaseweb.com remarks: Please send email to "abuse@leaseweb.com" for complaints remarks: regarding portscans, DoS attacks and spam. country: NL admin-c: LSW1-RIPE tech-c: LSW1-RIPE status: ASSIGNED PA "status:" definitions mnt-by: OCOM-MNT source: RIPE # Filtered person: RIP Mean address: P.O. Box 93054 address: 1090BB AMSTERDAM address: Netherlands phone: +31 20 3162880 fax-no: +31 20 3162890 abuse-mailbox: abuse@leaseweb.com nic-hdl: LSW1-RIPE mnt-by: OCOM-MNT source: RIPE # Filtered ...