Reference
Put down that phone!Please view me on real computer.
UNRIGHT$STRING, LENGTH
This function will remove rightmost characters based on a length.
PRINT UNRIGHT$("Hi World!", 7)
Hi