Optimal Telelicious Coding From AK To CT
 
« Vote PHP on Google AppEngine
Fring Skype/VOIP on Iphone »
 

99 Bottles of Beer in 1178+ Languages

My buddy Wyatt Dumas dropped me a link to this site with currently 1178 variations of how to program a computer to output 99 bottles of beer on the wall.

The perl version was very creative:

       ''=~(        '(?{'        .('`'        |'%')        .('['        ^'-')
       .('`'        |'!')        .('`'        |',')        .'"'.        '\\$'
       .'=='        .('['        ^'+')        .('`'        |'/')        .('['
       ^'+')        .'||'        .(';'        &'=')        .(';'        &'=')
       .';-'        .'-'.        '\\$'        .'=;'        .('['        ^'(')
       .('['        ^'.')        .('`'        |'"')        .('!'        ^'+')
      .'_\\{'      .'(\\$'      .';=('.      '\\$=|'      ."\|".(      '`'^'.'
     ).(('`')|    '/').').'    .'\\"'.+(    '{'^'[').    ('`'|'"')    .('`'|'/'
    ).('['^'/')  .('['^'/').  ('`'|',').(  '`'|('%')).  '\\".\\"'.(  '['^('(')).
    '\\"'.('['^  '#').'!!--'  .'\\$=.\\"'  .('{'^'[').  ('`'|'/').(  '`'|"\&").(
    '{'^"\[").(  '`'|"\"").(  '`'|"\%").(  '`'|"\%").(  '['^(')')).  '\\").\\"'.
    ('{'^'[').(  '`'|"\/").(  '`'|"\.").(  '{'^"\[").(  '['^"\/").(  '`'|"\(").(
    '`'|"\%").(  '{'^"\[").(  '['^"\,").(  '`'|"\!").(  '`'|"\,").(  '`'|(',')).
    '\\"\\}'.+(  '['^"\+").(  '['^"\)").(  '`'|"\)").(  '`'|"\.").(  '['^('/')).
    '+_,\\",'.(  '{'^('[')).  ('\\$;!').(  '!'^"\+").(  '{'^"\/").(  '`'|"\!").(
    '`'|"\+").(  '`'|"\%").(  '{'^"\[").(  '`'|"\/").(  '`'|"\.").(  '`'|"\%").(
    '{'^"\[").(  '`'|"\$").(  '`'|"\/").(  '['^"\,").(  '`'|('.')).  ','.(('{')^
    '[').("\["^  '+').("\`"|  '!').("\["^  '(').("\["^  '(').("\{"^  '[').("\`"|
    ')').("\["^  '/').("\{"^  '[').("\`"|  '!').("\["^  ')').("\`"|  '/').("\["^
    '.').("\`"|  '.').("\`"|  '$')."\,".(  '!'^('+')).  '\\",_,\\"'  .'!'.("\!"^
    '+').("\!"^  '+').'\\"'.  ('['^',').(  '`'|"\(").(  '`'|"\)").(  '`'|"\,").(
    '`'|('%')).  '++\\$="})'  );$:=('.')^  '~';$~='@'|  '(';$^=')'^  '[';$/='`';
http://www.99-bottles-of-beer.net/language-perl-737.html

Liked the python version for it’s originality and simplicity:

    import re, urllib
    print re.sub('</p>', '', re.sub('<br>|<p>|<br/> |<br/>','\n', re.sub('No', '\nNo', 
    urllib.URLopener().open('http://www.99-bottles-of-beer.net/lyrics.html').read()[3516:16297])))
http://www.99-bottles-of-beer.net/language-python-931.html

Lastly, there is a version programmed in whitespace which is apparently a windows only language I had never heard about. This must be Microsoft’s secret weapon for secure coding, or maybe it’s their language of choice for open sourcing their work. In either case it’s no doubt what Vista must have been written in :)

Leave a Reply