⟩ How to find a substring in a string without using substr built in functions, and print the substring found?
$r="YASHWANTH";
@n=split (//,$r);
print "@nn";
@t=splice(@n,0,3);
print "@tn";
$r=join("",@t);
print "$rn";
~
~
$r="YASHWANTH";
@n=split (//,$r);
print "@nn";
@t=splice(@n,0,3);
print "@tn";
$r=join("",@t);
print "$rn";
~
~
What does the IS NUMERIC clause establish?
What are the different data types available in COBOL?
What are 77 levels used for?
Name the divisions, which are available in a COBOL program?
What does the INITIALIZE verb do?
What does a status return code of nn29 mean in relation to record locks?
How are record locks released?
What are the types of record locks and how are they set?
What is an area sweep and when is it used?
If you are current on the owner of a set, what is the difference between obtain next and obtain first?