RosettaCodeData/Task/Hello-world-Text/PL-I/hello-world-text.pli

goodbye:proc options(main);
     put list('Hello world!');
end goodbye;