Re: MIDRANGE-L Digest V2 #1777

Cool!

phcoffin@us.ibm.com wrote:

> L. S. Russell writes:
>
> > # Program evaluates a complex mathmatical expression
> > #
> > #
> >
> > # This next line you might need to change.
> > #!/usr/bin/perl
> >
> > $test_exp = "";
> > $num = "";
> >
> > #Main()
> >  $test_exp = '$num = ((100 * 10) + 1);';  # DO NOT FORGET THE SEMI COLON
> >                                                                # AT THE
> END OF THE
> > EXPRESSION
> >                                                                # BEFORE
> THE
> > CLOSING QUOTE!!!
> >
> >  eval($test_exp);     # High level language function
> >
> >  print($num);
> >
> > exit;
>
> /* REXX procedure to do the same thing */
>
> test_exp = '(100 * 10) + 1'
> /* or better,                                 */
> /*   parse arg test_exp                       */
> /* and get the value passed from a parameter. */
>
> interpret "Say" test_exp
>
> return /* all done */
>
> I still do a fair amount of programming in REXX, though most of it is in VM
> and OS/2 these days. The limitation on the number of streams (files)  is a
> bit of a cramping factor on the AS/400.
>
> Peter H. Coffin
> Database Marketing Tools Developer
> phcoffin@us.ibm.com
> T/L 665-6298 (Outside: 414-223-6298)
>
> +---
> | 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
> +---

--
L. S. Russell Programmer/Analyst
Datrek Professional Bags, Inc.
2413 Industrial Drive
Springfield, TN. 37172
mailto:leslier@datrek.com
http://www.datrek.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
+---