Rexx

Rexx is a programming language created in 1979 by Mike Cowlishaw.

#116on PLDB

45Years Old

263Repos

Try now: Riju · TIO

Rexx (Restructured Extended Executor) is an interpreted programming language developed at IBM by Mike Cowlishaw. It is a structured, high-level programming language designed for ease of learning and reading. Proprietary and open source REXX interpreters exist for a wide range of computing platforms; compilers exist for IBM mainframe computers. Read more on Wikipedia...

Rexx Wikipedia page
Rexx docs
There are at least 263 Rexx repos on GitHub
Rexx first developed in IBM
PLDB estimates there are currently 40 job openings for Rexx programmers.
file extensions for Rexx include cmd, exec, rexx, rex, pprx, rx and arexx
The Google BigQuery Public Dataset GitHub snapshot shows 69 users using Rexx in 71 repos on GitHub
There are 11 Project Euler users using Rexx
Explore Rexx snippets on Rosetta Code
Rexx on HOPL
Rexx appears in the TIOBE Index
Rexx Ubuntu package
Pygments supports syntax highlighting for Rexx
GitHub supports syntax highlighting for Rexx
Rexx appears in the Quine Relay project
Indeed.com has 40 matches for "rexx engineer".
See also: (17 related languages)ARexx, NetRexx, Object Rexx, PL/I, Algol, EXEC, EXEC 2, Perl, Assembly language, Tcl, Python, Java, Linux, Unix, Solaris, Visual Basic, JScript

Example from Riju:

say "Hello, world!"

Example from hello-world:

<<hello.rexx>>=
Say "Hello World"

Example from Linguist:

/* rexx */
PARSE ARG filnamn
IF filnamn='' THEN DO
   filnamn='raw'
   filnamn='font.shapes'
   end
IF ~open(fil,filnamn,r) THEN EXIT 10
pixwidth=48
ebwidth=pixwidth/8
pixheight=48
depth=4
SAY "Skriver utfil..."
CALL open utfil,"RAM:utfil",W
CALL skriv pixwidth,2
CALL skriv pixheight,2
CALL skriv depth,2
CALL skriv ebwidth,2
bltsize=Right(C2B(D2C(pixheight)),10,"00")
bltsize=bltsize || Right(C2B(D2C(ebwidth)),6,"00")
/* SAY bltsize */
CALL skriv C2D(B2C(bltsize)),2
CALL skriv 0,4 /* xhandle, yhandle*/
CALL skriv 0,4 /* datapekare */
CALL skriv 0,4 /* cookiepekare */
CALL skriv ebwidth*pixheight,2 /* onebpmem */
CALL skriv ebwidth*pixheight+pixheight*2,2 /* onebpmemx */
CALL skriv ebwidth*pixheight*depth,2 /* allbpmem */
CALL skriv ebwidth*pixheight*depth+pixheight*2*depth,2 /* allbpmemx */
CALL skriv 0,2 /* padding */
CALL Close utfil
EXIT

skriv:
say "Skriver $"D2X(arg(1)) "("arg(2) "byte)"
call writech utfil,right(D2C(ARG(1)),ARG(2),"00"x)
return

visacookie:
   rad=copies('00'x,pixheight*ebwidth)
   say "Initierar bitmap till" pixheight*ebwidth*depth
   say "Ett bitplan =" pixheight*ebwidth
   bmap.=''
   say "laser in"
   do bitplan=1 to depth
      say "laser plan" bitplan
      rad=bitor(rad,readch(fil,pixheight*ebwidth))
      end
   ln=1
   say "skriver ut"
   do for pixheight
      say c2b(substr(rad,ln,bredd/8))
      ln=ln+bredd/8
      end
return

Example from Wikipedia:

ChangeCodePage: procedure /* protect SIGNAL settings */
 signal on syntax name ChangeCodePage.Trap
 return SysQueryProcessCodePage()
 ChangeCodePage.Trap: return 1004 /* windows-1252 on OS/2 */

Feature	Supported	Token	Example
Strings	✓	"	"Hello world"
MultiLine Comments	✓	/* */	/* A comment */
Print() Debugging	✓	say
Comments	✓		* => 1000000000 */
Semantic Indentation	X
Line Comments	X

Rexx - Programming language

Language features