RosettaCodeData/Task/Tokenize-a-string/AWK/tokenize-a-string-1.awk

BEGIN {
  s = "Hello,How,Are,You,Today"
  split(s, arr, ",")
  for(i=1; i < length(arr); i++) {
    printf arr[i] "."
  }
  print
}