PL/I（/piː ɛl wʌn/），源自編程語言一号（Programming Language One）的縮寫，一種过程式、指令式程式語言。由IBM公司在1960年代发明的第三代高级编程语言，用于IBM的MVS、或迪吉多的VAX/VMS等操作系统中。 在系统软件，图像，仿真，文字处理，网络，商业软件等领域均可应用。
| 编程范型 | 过程式, 指令式, 结构化 |
|---|---|
| 設計者 | IBM与SHARE语言发展委员会 |
| 實作者 | IBM |
| 发行时间 | 1964年 |
| 網站 | www |
| 衍生副語言 | |
| PL/M, XPL, PL/P, PL/C, PL/S, PL/AS, PL/X, PL/8, EPL[1] | |
| 受影响于 | |
| COBOL, Fortran, ALGOL | |
| 影響語言 | |
| SP/k, B语言, REXX, AS/400控制语言 | |
样例代码
编辑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;
引用
编辑- ^ R. A. Frieburghouse. The Multics PL/1 Compiler. Multicians.org. [2023-01-26]. （原始内容存档于2023-02-23）.
- ^ IBM Corporation. IBM Enterprise PL/I for z/OS, V5.3. IBM. [October 1, 2019]. （原始内容存档于2020-07-28）.
外部連結
编辑
- Kednos PL/I for HP OpenVMS VAX and Alpha
- IBM PL/I for IBM大型主機，Linux on zSeries and Windows
- PL/I Resources
- PL/I home
- PL/I newsletter April 2006
- Power vs. Adventure - PL/I and C（页面存档备份，存于互联网档案馆） A side-by-side comparison of PL/I and C。
- PL/I for GCC（页面存档备份，存于互联网档案馆） The pl1gcc project is an attempt to create a native PL/I compiler using the GNU Compiler Collection.
- Languages Related to PL/I
- Kednos PL/I for OpenVMS Compiler Documentation
- PL/I grammar（页面存档备份，存于互联网档案馆）
