Perl じゃなくて C か asm で書いた方がいいと思うけど。