![]() Print "Broadcast\n" if mac_is_broadcast($mac) Print "Multicast\n" if mac_is_multicast($mac) ![]() Print "Unicast\n" if mac_is_unicast($mac) Print 'Token Ring Format: ', $mac->as_tokenring,"\n" Print 'Single Dash Format: ',$mac->as_singledash,"\n" Print 'Microsoft Format: ',$mac->as_microsoft,"\n" Print 'IPv6 Address: ',$mac->as_ipv6_suffix,"\n" Print 'IEEE Format: ', $mac->as_ieee,"\n" Print 'Cisco Format: ',$mac->as_cisco,"\n" Print 'Basic Format: ',$mac->as_basic,"\n" Print "Universally Administered\n" if $mac->is_universal Print "Locally Administered\n" if $mac->is_local ![]() Print "Broadcast\n" if $mac->is_broadcast Print "Multicast\n" if $mac->is_multicast Print "MAC provided at object creation was: ", $mac->original My $mac = NetAddr::MAC->new( mac => '' ) NetAddr::MAC - MAC hardware address functions and object (EUI48 and EUI64) VERSION NetAddr::MAC->new( mac => $mac, %options ).
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |