• Subject: RE: Extract number from character field(Perl syntax)
  • From: Joel Fritz <JFritz@xxxxxxxxxxxxxxxx>
  • Date: Mon, 8 Nov 1999 12:52:22 -0800

Actually, the RPG example below looks like gibberish to me too.  I've never
had to use internally described files.  I'll have to paste it into SEU and
see what some of that stuff means. <g> 

I do agree with your real point about not everything being self explanatory
when the reader/viewer lacks necessary background information.  It is a
little scary reading code that uses symbols available on most keyboards that
you're not sure how to pronounce.  Reminds me of the Arthur C Clarke thing
about any sufficiently advanced technology looking like magic.

Does the code with the fewest keystrokes always execute the fastest?
> -----Original Message-----
> From: boldt@ca.ibm.com [mailto:boldt@ca.ibm.com]
> Sent: Monday, November 08, 1999 11:47 AM
> To: MIDRANGE-L@midrange.com
> Subject: RE: Extract number from character field(Perl syntax)
> 
> 
> 
> 
> Hi Joel:  No offense taken.
> 
> Look, when someone unfamiliar with RPG sees something like:
> 
>      fnndbf01   if   f  100    10aidisk
>      inndbf01   ns
>      i                                  1   10  dbcustno
>      i                                 11   40  dbname
> 
> what's he gonna think?  Clear as a bell?
> 
> You think you can write concise programs in RPG?  Well, in
> the Perl world, they play a game called "golf":  Try to
> write a Perl program using as few key strokes as possible.
> 
> Cheers!  Hans
> +---
> 
+---
| 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 thread ...

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].