PL/1
Från Rilpedia
PL/1 är utvecklat av IBM och blev en produkt i mitten av 1960-talet och fick från början namnet NPL (New Programming Language). NPL ändrades snart till PL/1 och betyder Programming Language 1. PL/1 användes mest för vetenskapliga tillämpningar men kom även att användas för vissa affärstillämpningar. Språket är procedurorienterat, med namnrymder, innehåller grundläggande logiska element som IF THEN-ELSE, DO WHILE, DO UNTIL, SELECT, satsblock (DO-END) och viss avbrottshantering (t.ex. ON ERROR), samt eget makrospråk. Dess styrka mot till exempel COBOL var att PL/1 implementerade avancerad text- och stränghantering samt logiska bitoperatorer. Karakteristiskt för PL/1-språket är dess mycket omfattande grammatik med stor mängd tillval. På 1980-talet lanserades PL/1 även i en förenklad variant PL/80 för mikrodatorer.
Exempel på "Hello World" i PL/1:
HELLO: PROCEDURE OPTIONS (MAIN); / * A PROGRAM TO OUTPUT HELLO WORLD * / FLAG = 0; LOOP: DO WHILE (FLAG = 0); PUT SKIP DATA(HELLO WORLD!); END LOOP; END HELLO;