{ split($1,instring,$2)
  print instring[NR]
}