added a (mostly) empty Perl assembler, and a sample file