RosettaCodeData/Task/Substring-Top-and-tail/Run-BASIC/substring-top-and-tail.basic

s$  = "Run BASIC"
print mid$(s$,2)             'strip first
print left$(s$,len(s$) -1)   'strip last
print mid$(s$,2,len(s$) -2)  'strip first and last