#! /usr/local/bin/awk  -f 
{ 
  gsub("S", "$")
  print $0
}