You can use the tieregistry module as long as the machines are windows and have remote registry capability. Windows ME does not! You also neeed authority for remote access.

Here is a snippit:

use Win32::TieRegistry( Delimiter=>"/" );

my $key;
my $computer = "xxx.xxx.xxx.xxx";
my $name;

            if ($key = $Registry->Open("//$computer/LMachine/SYSTEM/Cu
+rrentControlSet/" .
                "Control/ComputerName/ComputerName/", {Access=>KEY_REA
+D}) ) {
                    unless ($name = $key->GetValue("ComputerName")) {
                        print "Could not attach to read ComputerName o
+n $computer\n";
                    }
                    print "Name is $name\n";
            } else {
                print "failed\n";
           }
[download]

Update:

Guess I should read the question next time. The above will work if you were trying to get a remote host name from an ip address. Where is my coffee!