# on an Enterasys R2 AP it goes a bit like this.

sub mac2oid { join '.', map {hex} split ':', $_[0] }

my $macoid = mac2oid( '0:de:ad:be:ee:ef' );

my ($ifoid) = qw( .1.3.6.1.2.1.17.7.1.2.2.1.2.1 );
my ($howoid)= qw( .1.3.6.1.2.1.17.7.1.2.2.1.3.1 );

my $gets = [
        [ $ifoid, $macoid ],
        [ $howoid, $macoid ],
];

use SNMP;

...

# $session->get( $gets );   # i have an async module that
                            # scatters the gets across a
                            # list of access points that
                            # won't fit in this margin.

my $interface = $gets->[0]->[2];
my $how       = $gets->[1]->[2];

if ( $interface & 0x6 and $how = 3 ) {
  # on this switch the MAC has been seen
  # on the wireless interface (over the radio)
  # and was learned automatically (vs learned from mgmt
  #  or learned from a filer)

  # found which AP the MAC was on!
  # do something
}