Perl to asm/arm translator