my $n = Math::BigInt->new('0x3BFA281009296F2');
my $manufacturer = sprintf "%010s", $n;