Re: A short program

["Carl Galgano" <cgalgano@xxxxxxxxxxxxxxxxx>]

I'm sure this can be done in APL in one line, however I have forgotten all
the APL I learned way back when, besides, I don't have any of those funny
characters on my keyboard.  :)
CJG
Carl Galgano
EDI Consulting Services, Inc.
540 Powder Springs Street
Suite C19
Marietta, GA  30064
770-422-2995
mailto: cgalgano@ediconsulting.com
http://www.ediconsulting.com
EDI, Communications and AS400 Technical Consulting

-----Original Message-----
From: Roger Pence <rp@rogerpence.com>
To: MIDRANGE-L@midrange.com <MIDRANGE-L@midrange.com>
Date: Wednesday, April 07, 1999 10:31 PM
Subject: A short program


>>I love doing this with small one time use programs.  It's fun trying
>>to see how few lines of code I can get by with.  One time I had a
>>three line program.  One F spec for the primary file opened for
>>update, a C spec to plug a value into a field, and a C spec for the
>>update.  Does anyone remember the old game show "Name That Tune"?
>>"I can write that program with 4 lines!"
>
>Geeze, you guys. Cycle this.
>
>Since my direct plea to not go on endlessly and redundantly about the cycle
>didn't work, maybe I can distract you!
>
>Here is a contest for you all.
>
>Write the shortest program possible that can list its own source. You can
>use any language.
>
>This was originally a contest at a NEWS/400 tech editor meeting. It may
>actually be a long-standing programmer riddle, but I had never heard of it.
>At the time, Paul Contest refereed the contest and AS/400 rockest scientist
>extraordinare Bruce Lesnick won first place. Bruce's answer was exceedingly
>clever.
>
>First prize: six cold ones on me.
>
>Anyone here smarter than, or as smart as, Bruce?
>
>rp
>
>+---
>| This is the Midrange System Mailing List!
>| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
>| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
>| To unsubscribe from this list send email to
MIDRANGE-L-UNSUB@midrange.com.
>| Questions should be directed to the list owner/operator:
david@midrange.com
>+---

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---