euthanasepam: G (G)
Кабінет психопатологічної евтаназіології ([personal profile] euthanasepam) wrote2022-08-18 03:04 am

Ретроградсько-іноваційне: Rexx

 


Вчора випадково з’ясував, що програмувальна мова Rexx жива-живісінька (а не покинута й забута, як OS/2).

Мова та принаймні деякі її дистрибуції та засоби є вільним програмним забезпеченням. Принаймні одна з них — Regina Rexx — стандартизована інститутом ANSI. Можна використовувати Rexx як прикладну мову для написання сценаріїв та «клей» для системного адміністрування у різних операційних системах. Вчора я собі був інсталював об’єктно-орієнтований інтерпретатор Open Object Rexx (ooRexx) для забавок, а трішки згодом додав і Реґіну та, сповнившись зворушення від почуттів, оце пишу допис.

Переглядаючи документацію про мову на сайті rexxinfo.org та роблячи для одного зі своїх улюблених текстових редакторів сніпети й таке інше для Rexx’у, милуюся простотою та інтуїтивною, очевидною зрозумілістю засобів мови. Погляньте на цей простенький приклад:

/* Rexx */

text = "This is a text string. Let's try to reverse it!"
SAY REVERSE(text)

'TYPE reverse.rex'

EXIT


Програма переписує рядок задом наперед, а далі друкує в емуляторі терміналу текст самої себе (це Windows, CMD, TYPE):

>regina .\reverse.rex

!ti esrever ot yrt s'teL .gnirts txet a si sihT
/* Rexx */

text = "This is a text string. Let's try to reverse it!"
SAY REVERSE(text)

'TYPE reverse.rex'

EXIT


Давні комп’ютерні забавки дарують радість. :)





 

Post a comment in response:

This account has disabled anonymous posting.
If you don't have an account you can create one now.
HTML doesn't work in the subject.
More info about formatting