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

void local fn DoIt
  CFStringRef s = @"knights"
  print s
  CFStringRef s1 = mid(s, 1, len(s) - 1)
  print s1
  CFStringRef s2 = left(s,   len(s) - 1)
  print s2
  CFStringRef s3 = mid(s, 1, len(s) - 2)
  print s3
end fn

fn DoIt

HandleEvents