Anonymous user
Sort a list of object identifiers: Difference between revisions
m
→{{header|REXX}}: finished the cut-n-paste.
m (→{{header|REXX}}: updated the data with the latest object identifies, the REXX program didn't change.) |
m (→{{header|REXX}}: finished the cut-n-paste.) |
||
Line 425:
This REXX version supports the new and old format (supports a leading decimal point).
<lang rexx>/*REXX program performs a sort of OID (Object IDentifiers ◄── used in Network data). */
#=words($) /*#: the number of OIDs in the $ list.*/
a=; do i=1 for #; @.i=word($, i); a=a @.i /*build the @ array; build a composite.*/
| |||