2008年2月13日

MACアドレス反転計算

限られた方へ
SNAネットでイーサに乗る際にMACアドレス反転計算めんどくせぇという方に。
(そんな人いない)

・やりたいこと
step1. MACアドレス(HEX)より2桁ずつ取出し
step2. 2進数化
step3. 8bitごとに前後反転
step4. 16進数化

Perlを知らない時は手で計算してました。
エクセルを使う場合、HEX2DEC DEC2HEXやらしてましたが、
PC変わる度に分析ツール入れるのが面倒でした。
今では、Perlでこれだけ。

my @a = qw/12 34 56 78 90 12/; #Set MACaddres
foreach (@a){
tr/0123456789ABCDEF/084C2A6E195D3B7F/;
my $a .= reverse $_;
print $a;
}

最初は頭固かったのでMath::BaseCalcなんぞ無理やり使おうとしてました。

#参考:ビットフリップされたイーサネットアドレス計算