use strict; use warnings; use MAC; my $mac = MAC->new('10:BE:AF:1C:06:1F'); print $mac->showdec . "\n"; print $mac->showhex . "\n"; print $mac->increase(10) . "\n"; print $mac->increase(65536) . "\n"; print $mac->decrease(256) . "\n"; print $mac->decrease(16777216) . "\n";