I note that this "write-only" epithet is usually applied by people who don't know Perl. Perl programs written by competent programmers are not usually hard to understand (assuming of course that you know Perl).
And note that the original Obfuscated Code contest was for C language programs: http://en.wikipedia.org/wiki/Obfuscated_code

And the same is true of any language. It is probably fairer to say that AppleScript is verbose, than to characterize it as read-only, but folks who think Perl is "write-only" have never had to try to decipher a poorly commented program in any language that supported goto.

Apple ][ BASIC wasn't too bad. But with <30kb usable memory it couldn't get too complicated. I think GOTO and GOSUB were the only loop options other than FOR-NEXT. I hope my school's CompSci teacher didn't need too much therapy after our class. (We drove the Gr.10 algebra teacher to a nervous breakdown).
6502 assembly code did goto, comments were maybe 20 characters each, but then no one expects machine code to be easy to read later. I'll stop now before I date myself too much :D

The first machine I ever wrote code for was a Royal McBee LGP30 - a hard dating to beat, I suspect. Its memory was a rotating drum with 80 read heads on it, 4096 words in total.
http://www.users.nwark.com/~rcmahq/jclark/lgp30.jpg