Problem Statement

The task is to demonstrate how to remove the first and last characters from a string. The solution should demonstrate how to obtain the following results:

If the program uses UTF-8 or UTF-16, it must work on any valid Unicode code point, whether in the Basic Multilingual Plane or above it. The program must reference logical characters (code points), not 8-bit code units for UTF-8 or 16-bit code units for UTF-16. Programs for other encodings (such as 8-bit ASCII, or EUC-JP) are not required to handle all Unicode characters.

Let's start with the solution:

    s: "1234567890"
"1234567890"
    s _di 0 /Delete 1st character
"234567890"
    s _di -1+#s /Delete last character
"123456789"
    (s _di -1+#s) _di 0 /String with both 1st and last character removed
"23456789"


    s: "1234567890"
"1234567890"
    1 _ s  /Delete 1st character
"234567890"
    -1 _ s /Delete last character
"123456789"
    1 - -1 _ s /Delete 1st and last character
"23456789"