PLI.pl1

Hello2: proc options(main);
     put list ('Hello World');
end Hello2;