Script para verificar fabricante de kit

Fala pplz!!

Essa naum e uma pergunta e sim uma solucao, esse script em perl eu peguei no O'Relly e serve pra ver o fabricante de uma placa a partir do MAC Adress:

#!/usr/bin/perl

my %cards;
my %ips;

open(ARP,"arp -an|") || die "Couldn't open arp table: $!\n";

print "Looking up OUIs.";
while(<ARP>) {
chomp;
my $addr = $_;
my $ip = $_;
$addr =~ s/.* ([\d\w]+:[\d\w]+:[\d\w]+):.*/$1/;
$addr =~ s/\b([\d\w])\b/0$1/g;
$addr =~ s/:/-/g;
next unless $addr =~ /..-..-../;

$ip =~ s/.*?(\d+\.\d+\.\d+\.\d+).*/$1/;
print ".";
$cards{$addr}||=`curl -sd 'x=$addr' http://standards.ieee.org/cgi-bin/ouisearch`;
($cards{$addr} =~ /Sorry!/) && ($cards{$addr} = "Unknown OUI: $addr");
$ips{$ip} = $addr;
}
print "\n";
for(keys(%ips)) {
$cards{$ips{$_}} =~ s/.*.hex.\s+([\w\s\,\.-]+)\n.*/$1/s;
print "$_ -> $cards{$ips{$_}}\n";
}

--------------------

hehe, soh isso, usem e vejam q legal!

[]'s

opa gostei....

jah vou testar...

hehe essa parte eh legal :)

e so procurar no site da ieee :) que la tem tudo.

para quem nao sabe basta saber que:

o mac eh divido em 2 partes, os primeiros 6 bytes sao do fabricante (oui) e o resto eh o numero de "serie" da placa.

o script faz uma consulta ao site da ieee e filtra o resultado apresentando na tela

[]'s