[whois.arin.net]
Fuse Internet Access (NETBLK-FUSE-NET-BLK-1) FUSE-NET-BLK-1
                                                   216.68.0.0 - 216.68.255.255
Fuse Modem Ports (NETBLK-FUSE-216-68-32-0) FUSE-216-68-32-0
                                                   216.68.32.0 - 216.68.47.255
 
To single out one record, look it up with "!xxx", where xxx is the
handle, shown in parenthesis following the name, which comes first.

##</code><code>##

#!/usr/bin/perl -w
 
use strict;
 
my $arin="/usr/bin/whois -h whois.arin.net";
 
my $ip = "216.68.40.234";
 
my $result =  `$arin $ip`;
 
if ($result =~ m/xxx/){ 
   $result =~ m/\((.*?)\)/g;
  print "The handle is: $1\n"; 
  print "The 2nd handle is: $2\n";
}