1{
2   if (substr($1,1,1) == substr($0,1,1))
3      print "substr matches"
4   sub(/foo/,"bar")
5   print nr++
6}
7