PL/I

(重定向自PLI

PL/I/p ɛl wʌn/),源自编程语言一号Programming Language One)的缩写,一种过程式指令式编程语言。由IBM公司在1960年代发明的第三代高级编程语言,用于IBM的MVS英语MVS、或迪吉多VAX/VMS操作系统中。 在系统软件,图像,仿真,文字处理,网络,商业软件等领域均可应用。

PL/I
编程范型过程式, 指令式, 结构化
设计者IBMSHARE英语SHARE (computing)语言发展委员会
实作者IBM
发行时间1964年,​60年前​(1964
网站www.ibm.com/products/pli-compiler-zos 编辑维基数据链接
衍生副语言
PL/M英语PL/M, XPL英语XPL, PL/P英语PL/P, PL/C英语PL/C, PL/S英语IBM PL/S, PL/AS英语PL/AS, PL/X英语PL/X, PL/8英语PL/8, EPL[1]
启发语言
COBOL, Fortran, ALGOL
影响语言
SP/k英语SP/k, B语言, REXX, AS/400控制语言英语AS/400 Control Language

样例代码

编辑

Hello world程序

编辑
Hello2: proc options(main);
    put list ('Hello, world!');
end Hello2;

查找字符串

编辑
/* Read in a line, which contains a string,
/* and then print every subsequent line that contains that string. */

find_strings: procedure options (main);
    declare pattern character (100) varying;
    declare line character (100) varying;
    declare line_no fixed binary;

    on endfile (sysin) stop;

    get edit (pattern) (L);
    line_no = 1;
    do forever;
        get edit (line) (L);
        if index(line, pattern) > 0 then
            put skip list (line_no, line);
        line_no = line_no + 1;
    end;

end find_strings;

引用

编辑
  1. ^ R. A. Frieburghouse. The Multics PL/1 Compiler. Multicians.org. [2023-01-26]. (原始内容存档于2023-02-23). 
  2. ^ IBM Corporation. IBM Enterprise PL/I for z/OS, V5.3. IBM. [October 1, 2019]. (原始内容存档于2020-07-28). 

外部链接

编辑