Perl does not seem to provide a strlen function, and the RINDEX function can also get the length of the string.
$ STR = "ABCD 1234";
$ LEN = RINDEX $ STR. "/ $", "/ $";
Print "$ LEN / N";
Execution: Lenet of 'ABCD 1234' IS: 9
