$run="snmpwalk $host $opt_c ifType.".$thisport;

open(PIPE,"$run |") || die "Failed to get type, stopped.";

while(<PIPE>) {
    $type=$_;
}
close(PIPE);

print "$MAC    $type    $ifName     $iftomodule{$ifIndex}     $iftoport{$ifIndex}    $ifIndex     $bridgeport     $vlan    $host\n";