in reply to LAN Website NT User ID Retrieval

I ended up solving this on my own. I used the Net::NBName module, which uses NetBios. Here is a selection of what I used (some of which, is used from the Net::NBName man pages):

Modules used:> CGI, and Net::NBName

my $cgi = CGI->new; my $nb = Net::NBName->new; #Remote User's IP Address my $user_ip = $ENV{'REMOTE_ADDR'}; #Retrieve Net Bios Name Table for that IP $ns = $nb->node_status($user_ip); #Split em Up if ($ns) { for my $rr ($ns->names) { if ($rr->suffix == 0 && $rr->G eq "GROUP") { $domain = $rr->name; } if ($rr->suffix == 3 && $rr->G eq "UNIQUE") { $user = $rr->name; } if ($rr->suffix == 0 && $rr->G eq "UNIQUE") { $machine = $rr->name unless $rr->name =~ /^IS~/; } } $mac_address = $ns->mac_address; }
Hope this is helpful to someone in the future!

:J)schniP