RosettaCodeData/Task/Substring/PL-I/substring.pli

9 lines
164 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
s='abcdefghijk';
n=4; m=3;
u=substr(s,n,m);
u=substr(s,n);
u=substr(s,1,length(s)-1);
u=left(s,length(s)-1);
u=substr(s,1,length(s)-1);
u=substr(s,index(s,'g'),m);