Re: Extract number from character field(Perl syntax)

Joel,

Hans said:
>> >>      @nums = $str =~ /\d+/g;
 
>> Believe it or not, that code is clear as a bell to a
>> typical Perl programmer!

Joel said:
>No offense, Hans, but what does this say about the "typical Perl
>programmer?"

It says that the typical Perl programmer has a different background
than the typical RPG programmer.  Most RPG programmers have no idea
what a "regular expression" is, and why they so useful.

But show a Perl programmer a RPG program using the cycle and no calcs,
and they may be equally mystified as to what it does.  Especially if
it uses matching records. <g>  Heck, even RPG programmers seem
mystified by it. <gd&r>

Regular expressions are *very* powerful when it comes to text parsing,
pattern matching, etc.  The example was actually a very simple regular
expression -- you should see some of them.  But what you can
accomplish with one pattern match is nearly unfathomable to an RPG
programmer.

Doug
+---
| 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
+---